RMKusto
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
[Code]
var
Page1, Page2, Page3: TInputQueryWizardPage;
Page4: TInputDirWizardPage;
ComboBox1: TComboBox;
procedure InitializeWizard();
begin
Page1 := CreateInputQueryPage(wpWelcome,
'Licence key validation', '',
'Please enter your licence key, then click Next.' #13 #13 'Note: Your licence key can be obtained at help.com' #13 #13 #13);
Page1.Add('Licencekey:', False);
Page2 := CreateInputQueryPage(Page1.ID,
'text 1', 'text 2',
'text 3' #13 ' text 4');
Page2.Add('Option 1', False);
Page2.Add('Option 2', False);
Page2.Add('Option 3', False);
Page2.Add('Option 4', False);
Page2.Add (Combobox1, False);
end; |
Всего записей: 64 | Зарегистр. 15-05-2002 | Отправлено: 12:58 17-11-2008 | Исправлено: RMKusto, 16:25 17-11-2008 |
|
