EN130,
Где-нибудь в конце скрипта дописываете:
Код:
Procedure InitializeWizard();
begin
InitializeWizard1();
InitializeWizard2();
InitializeWizard3();
InitializeWizard4();
InitializeWizard5();
InitializeWizard7();
InitializeWizard8(); // сколько будете использовать процедур InitializeWizard.
end;
А все процедуры InitializeWizard переименовываете по порядку: InitializeWizard() в InitializeWizard1(), следующий InitializeWizard() в InitializeWizard2(), и так далее.
Можно так-же и другие процедуры использовать:
Код:
procedure CurPageChanged(CurPageID: Integer);
begin
CurPageChanged1(CurPageID);
CurPageChanged2(CurPageID);
CurPageChanged3(CurPageID);
CurPageChanged4(CurPageID);
end;
procedure CurStepChanged(CurStep: TSetupStep);
begin
CurStepChanged1(CurStep);
CurStepChanged2(CurStep);
end;
Например.