Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для Dodakaedr

Ветеран


Сообщения: 863
Благодарности: 262

Профиль | Отправить PM | Цитировать


Цитата ShadeUa:
Здраствуйте , не подскажите как сделать абзац в строке в Inno »
Скрытый текст
Код: Выделить весь код
[Setup]
AppName=test
AppVersion=1.0
DefaultDirName={pf}\test

[Code]
var
  Label1: TLabel;

procedure RedesignWizardForm;
begin
  { Label1 }
  Label1 := TLabel.Create(WizardForm);
  with Label1 do
  begin
    Parent := WizardForm.WelcomePage;
    Caption := 'Label1' + #13#10 +
         '' + #13#10 +
         'абзац....';
    Left := ScaleX(192);
    Top := ScaleY(216);
    Width := ScaleX(45);
    Height := ScaleY(39);
  end;

  with WizardForm.WelcomeLabel2 do
  begin
    Height := ScaleY(103);
  end;
end;

procedure InitializeWizard();
begin
  RedesignWizardForm;
end;

-------
Inno Setup 5 Ultra Unicode

Это сообщение посчитали полезным следующие участники:

Отправлено: 17:32, 14-03-2015 | #289