[SatHan]

посмотри скрипт если не трудно, пост 907»

я ещё новичёк в скриптах.
Смотри, если это

читать дальше »

Код:

procedure InitializeWizard();
var
//Определяем поле ввода пароля
PasswordEdit: TPasswordEdit;
begin
  Mylbl:= tLabel.Create(WizardForm);
  MyLbl.AutoSize:= False;
  MyLbl.WordWrap:= true;
  MyLbl.SetBounds(0, 0, 301, 73);
  MyLbl.Parent:= WizardForm.WelcomeLabel2;
  WizardForm.DirEdit.OnChange:= @EditOnChange;
  WizardForm.DirEdit.Text:= WizardForm.DirEdit.Text+#0;
  ProgressLabel:=TLabel.Create(WizardForm)
    ProgressLabel.Top:= 4
    ProgressLabel.Left:= 200
    ProgressLabel.Caption:= '0%'
    ProgressLabel.AutoSize:= True
    ProgressLabel.Font.Color:= clBlue
    ProgressLabel.Font.Style:= [fsBold]
    ProgressLabel.Transparent:= True
    ProgressLabel.Parent:= WizardForm.ProgressGauge
  WizardForm.PasswordEdit.Text := '        ';
  ExtractTemporaryFile('MicrosoftClassic15.bmp');
  bmp := TBitmap.create;
  bmp.LoadFromFile(ExpandConstant('{tmp}\MicrosoftClassic15.bmp'));
    enablefire(WizardForm.WelcomePage.Handle, 0, 0, bmp.Handle, 50);
end;

За-комментировать то ошибок не выдаёт, скорее всего чего то не хватает только не знаю чего, мож гуру подскажут.