R.i.m.s.k.y.
Ура!!!
наконец-то это то что мне нужно было прямо точно как в картине, а говоришь не осилишь недооцениваешь себя огромное спасибо. Теперь этот кусок кода можно ка-кто приклеить procedure ChangeCaption(str: string);
begin
WizardForm.StatusLabel.Caption:= str;
ChangeCaption('Распаковка архива');
