[Nordek]

Как можно растянуть окно для текста компонентов на весь экран ? »

Как-то не особо понятно.

Регулируй по своему InnerNotebook, OuterNotebook и остальные по необходимости

InnerNotebook

Код:

  with WizardForm.InnerNotebook do
  begin
    Left := ScaleX(XXX);
    Top := ScaleY(XXX);
    Width := ScaleX(XXX);
    Height := ScaleY(XXX);
  end;

OuterNotebook

Код:

  with WizardForm.OuterNotebook do
  begin
    Left := ScaleX(XXX);
    Top := ScaleY(XXX);
    Width := ScaleX(XXX);
    Height := ScaleY(XXX);
  end;

Необработанный пример большого инсталлятора

Код:

[Code]
procedure InitializeWizard();
begin
  with WizardForm do
  begin
    AutoScroll := False;
    ClientHeight := ScaleY(550);
    ClientWidth := ScaleX(709);
  end;

  with WizardForm.Bevel do
  begin
    Top := ScaleY(505);
    Width := ScaleX(710);
  end;

  with WizardForm.CancelButton do
  begin
    Left := ScaleX(172);
    Top := ScaleY(519);
  end;

  with WizardForm.NextButton do
  begin
    Left := ScaleX(92);
    Top := ScaleY(519);
  end;

  with WizardForm.BackButton do
  begin
    Left := ScaleX(12);
    Top := ScaleY(519);
  end;

  with WizardForm.OuterNotebook do
  begin
    Width := ScaleX(710);
    Height := ScaleY(505);
  end;

  with WizardForm.WizardBitmapImage do
  begin
    Width := ScaleX(212);
    Height := ScaleY(506);
  end;

  with WizardForm.WelcomeLabel2 do
  begin
    Left := ScaleX(240);
    Width := ScaleX(445);
    Height := ScaleY(415);
  end;

  with WizardForm.WelcomeLabel1 do
  begin
    Left := ScaleX(240);
    Width := ScaleX(445);
  end;

  with WizardForm.Bevel1 do
  begin
    Width := ScaleX(710);
  end;

  with WizardForm.InnerNotebook do
  begin
    Left := ScaleX(8);
    Top := ScaleY(64);
    Width := ScaleX(697);
    Height := ScaleY(437);
  end;

  with WizardForm.LicenseNotAcceptedRadio do
  begin
    Top := ScaleY(408);
  end;

  with WizardForm.LicenseAcceptedRadio do
  begin
    Top := ScaleY(388);
  end;

  with WizardForm.LicenseMemo do
  begin
    Width := ScaleX(697);
    Height := ScaleY(340);
  end;

  with WizardForm.LicenseLabel1 do
  begin
    Width := ScaleX(697);
  end;

  with WizardForm.InfoBeforeMemo do
  begin
    Width := ScaleX(697);
    Height := ScaleY(405);
  end;

  with WizardForm.DiskSpaceLabel do
  begin
    Top := ScaleY(416);
  end;

  with WizardForm.DirBrowseButton do
  begin
    Left := ScaleX(614);
  end;

  with WizardForm.DirEdit do
  begin
    Width := ScaleX(604);
  end;

  with WizardForm.ComponentsDiskSpaceLabel do
  begin
    Top := ScaleY(416);
  end;

  with WizardForm.ComponentsList do
  begin
    Width := ScaleX(697);
    Height := ScaleY(344);
  end;

  with WizardForm.TypesCombo do
  begin
    Width := ScaleX(697);
  end;

  with WizardForm.SelectComponentsLabel do
  begin
    Width := ScaleX(681);
  end;

  with WizardForm.NoIconsCheck do
  begin
    Top := ScaleY(415);
  end;

  with WizardForm.GroupBrowseButton do
  begin
    Left := ScaleX(614);
  end;

  with WizardForm.GroupEdit do
  begin
    Width := ScaleX(604);
  end;

  with WizardForm.TasksList do
  begin
    Width := ScaleX(697);
    Height := ScaleY(400);
  end;

  with WizardForm.ReadyMemo do
  begin
    Width := ScaleX(697);
    Height := ScaleY(413);
  end;

  with WizardForm.PreparingLabel do
  begin
    Width := ScaleX(673);
    Height := ScaleY(113);
  end;

  with WizardForm.PreparingMemo do
  begin
    Top := ScaleY(168);
    Width := ScaleX(649);
    Height := ScaleY(249);
  end;

  with WizardForm.ProgressGauge do
  begin
    Width := ScaleX(697);
  end;

  with WizardForm.InfoAfterMemo do
  begin
    Width := ScaleX(697);
    Height := ScaleY(405);
  end;

  with WizardForm.MainPanel do
  begin
    Width := ScaleX(710);
  end;

  with WizardForm.WizardSmallBitmapImage do
  begin
    Left := ScaleX(656);
    Top := ScaleY(0);
  end;

  with WizardForm.WizardBitmapImage2 do
  begin
    Width := ScaleX(212);
    Height := ScaleY(506);
  end;

  with WizardForm.RunList do
  begin
    Left := ScaleX(240);
  end;

  with WizardForm.NoRadio do
  begin
    Left := ScaleX(240);
  end;

  with WizardForm.YesRadio do
  begin
    Left := ScaleX(240);
  end;

  with WizardForm.FinishedLabel do
  begin
    Left := ScaleX(240);
    Width := ScaleX(445);
  end;

  with WizardForm.FinishedHeadingLabel do
  begin
    Left := ScaleX(240);
    Width := ScaleX(445);
  end;
end;