[GRiD555x]

[code]

Код:

 procedure InitializeWizard1();
 begin
 WizardForm.InnerPage.Visible:=False;
 WizardForm.WelcomeLabel1.Visible:=False;
 WizardForm.WelcomeLabel2.Visible:=False;
 WizardForm.WizardSmallBitmapImage.left:=0;
 WizardForm.WizardSmallBitmapImage.Width:=WizardForm.Width;
 WizardForm.PageNameLabel.Visible:=False;
 WizardForm.PageDescriptionLabel.Visible:=False;
 WizardForm.WizardBitmapImage.Width:=WizardForm.ClientWidth;
 WizardForm.WizardBitmapImage.Height:=WizardForm.ClientHeight;
 WizardForm.WizardBitmapImage2.Width:=WizardForm.ClientWidth;
 WizardForm.OuterNotebook.Height:=WizardForm.ClientHeight;
 WizardForm.InnerNotebook.Height:=WizardForm.ClientHeight;
 WizardForm.WizardBitmapImage2.Height:=WizardForm.ClientHeight;
 WizardForm.NextButton.BringToFront;
 WizardForm.CancelButton.BringToFront;
 WizardForm.BackButton.BringToFront;
 WizardForm.FinishedHeadingLabel.Visible:=False;
 WizardForm.FinishedLabel.Visible:=False;
 end;

 const
 Color = clblack;      // цвет окна инстала

procedure InitializeWizard2();
 begin

WizardForm.Font.Color:=clWhite;      // цвет текста
 wizardForm.WelcomeLabel1.Font.Color:=clWhite;     // цвет текста
 WizardForm.FinishedHeadingLabel.Font.Color:=clWhite;      // цвет текста
 WizardForm.PageNameLabel.Font.Color:=clWhite;      // цвет текста
 WizardForm.Color:=Color;
 WizardForm.WelcomePage.Color:=Color;
 WizardForm.InnerPage.Color:=Color;
 WizardForm.FinishedPage.Color:=Color;
 WizardForm.LicensePage.Color:=Color;
 WizardForm.PasswordPage.Color:=Color;
 WizardForm.InfoBeforePage.Color:=Color;
 WizardForm.UserInfoPage.Color:=Color;
 WizardForm.SelectDirPage.Color:=Color;
 WizardForm.SelectComponentsPage.Color:=Color;
 WizardForm.SelectProgramGroupPage.Color:=Color;
 WizardForm.SelectTasksPage.Color:=Color;
 WizardForm.ReadyPage.Color:=Color;
 WizardForm.PreparingPage.Color:=Color;
 WizardForm.InstallingPage.Color:=Color;
 WizardForm.InfoAfterPage.Color:=Color;
 WizardForm.DirEdit.Color:=Color;
 WizardForm.DiskSpaceLabel.Color:=Color;
 WizardForm.DirEdit.Color:=Color;
 WizardForm.GroupEdit.Color:=Color;
 WizardForm.PasswordLabel.Color:=Color;
 WizardForm.PasswordEdit.Color:=Color;
 WizardForm.PasswordEditLabel.Color:=Color;
 WizardForm.ReadyMemo.Color:=Color;
 WizardForm.TypesCombo.Color:=Color;
 WizardForm.WelcomeLabel1.Color:=Color;
 WizardForm.InfoBeforeClickLabel.Color:=Color;
 WizardForm.MainPanel.Color:=Color;
 WizardForm.PageNameLabel.Color:=Color;
 WizardForm.PageDescriptionLabel.Color:=Color;
 WizardForm.ReadyLabel.Color:=Color;
 WizardForm.FinishedLabel.Color:=Color;
 WizardForm.YesRadio.Color:=Color;
 WizardForm.NoRadio.Color:=Color;
 WizardForm.WelcomeLabel2.Color:=Color;
 WizardForm.LicenseLabel1.Color:=Color;
 WizardForm.InfoAfterClickLabel.Color:=Color;
 WizardForm.ComponentsList.Color:=Color;
 WizardForm.ComponentsDiskSpaceLabel.Color:=Color;
 WizardForm.BeveledLabel.Color:=Color;
 WizardForm.StatusLabel.Color:=Color;
 WizardForm.FilenameLabel.Color:=Color;
 WizardForm.SelectDirLabel.Color:=Color;
 WizardForm.SelectStartMenuFolderLabel.Color:=Color;
 WizardForm.SelectComponentsLabel.Color:=Color;
 WizardForm.SelectTasksLabel.Color:=Color;
 WizardForm.LicenseAcceptedRadio.Color:=Color;
 WizardForm.LicenseNotAcceptedRadio.Color:=Color;
 WizardForm.UserInfoNameLabel.Color:=Color;
 WizardForm.UserInfoNameEdit.Color:=Color;
 WizardForm.UserInfoOrgLabel.Color:=Color;
 WizardForm.UserInfoOrgEdit.Color:=Color;
 WizardForm.PreparingLabel.Color:=Color;
 WizardForm.FinishedHeadingLabel.Color:=Color;
 WizardForm.UserInfoSerialLabel.Color:=Color;
 WizardForm.UserInfoSerialEdit.Color:=Color;
 WizardForm.TasksList.Color:=Color;
 WizardForm.RunList.Color:=Color;
 WizardForm.SelectDirBrowseLabel.Color:=Color;
 WizardForm.SelectStartMenuFolderBrowseLabel.Color:=Color;
 WizardForm.Bevel.visible:=false;
 WizardForm.Bevel1.visible:=false;
 end;

вот я сделал так но ещё я прочитал кое где что надо вставить после этого в конец скрипта вот

Код:

procedure InitializeWizard(); 
 begin 
 procedure InitializeWizard1(); 
 procedure InitializeWizard2(); 
 end;

куда именно?>