chelobey
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Setup AppName=My Program AppVerName=My Program v.1.2 AlwaysShowComponentsList=true DefaultDirName={pf}\My Program Components Name: prog; Description: program; Types: var1; Flags: exclusive Name: cfg1; Description: program+config 1; Types: var2; Flags: exclusive Name: cfg2; Description: program+config 2; Types: var2; Flags: exclusive Name: cfg3; Description: program+config 3; Types: var2; Flags: exclusive Types Name: var1; Description: program Name: var2; Description: program+config; Flags: iscustom Code var Page1, Page2, Page3: TWizardPage; Procedure InitializeWizard(); begin Page1:= CreateCustomPage(wpSelectComponents, 'Config 1 page', 'cfg1'); Page2:= CreateCustomPage(Page1.ID, 'Config 2 page', 'cfg2'); Page3:= CreateCustomPage(Page1.ID, 'Config 3 page', 'cfg3'); end; function ShouldSkipPage(PageID: Integer): Boolean; begin Case PageID of Page1.ID,Page1.ID: Result:= not IsComponentSelected('cfg1'); Page1.ID,Page2.ID: Result:= not IsComponentSelected('cfg2'); Page1.ID,Page3.ID: Result:= not IsComponentSelected('cfg3'); end; end; | Всего записей: 78 | Зарегистр. 31-05-2007 | Отправлено: 08:45 20-12-2008 | Исправлено: chelobey, 12:37 20-12-2008 |
|