[Shkutu]

Kashtan007, как-то так

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

Код:

var  ModCheck, BackupCheck: TNewCheckBox;

procedure  InitializeWizard; 
begin
   ModCheck:= TNewCheckBox.Create(PageFromID(wpSelectDir));
   ModCheck.Width := PageFromID(wpSelectDir).SurfaceWidth;
   ModCheck.Parent := PageFromID(wpSelectDir).Surface;
   ModCheck.Caption:='Удалить старые моды';  
   ModCheck.left:=wizardForm.DirEdit.left;
   ModCheck.Top:=wizardForm.DirEdit.top + ScaleY(30);

   BackupCheck:= TNewCheckBox.Create(PageFromID(wpSelectDir));
   BackupCheck.Width := PageFromID(wpSelectDir).SurfaceWidth;
   BackupCheck.Parent := PageFromID(wpSelectDir).Surface;
   BackupCheck.Caption:='Сохранить резервную копию';  
   BackupCheck.left:=wizardForm.DirEdit.left;
   BackupCheck.Top:=ModCheck.top + ScaleY(30);
end;