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

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

Аватара для SatHan

Пользователь


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

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


Цитата spice:
А можно по подробнее я не понимаю че за название Лейбла?
куда их пихать? »
Что тебе не понятно то?
Пример
читать дальше »
WizardForm - Форма - Обязательный параметр
Лейблы
WelcomeLabel1 - Первый лейбл - то что начинается с "Вас приветствует мастер"
WelcomeLabel2 - Второй лейбл - то что начинается с "Программа установит"

Добавляешь WelcomeLabel1 либо WelcomeLabel2 после WizardForm через точку, получается

Код: Выделить весь код
  WizardForm.WelcomeLabel1.Left := ScaleX(10);
  WizardForm.WelcomeLabel1.Font.Color := clLime;

  WizardForm.WelcomeLabel2.Left := ScaleX(10);
  WizardForm.WelcomeLabel2.Font.Color := clRed;
всё это помещаешь в процедуру, например InitializeWizard

Код: Выделить весь код
procedure InitializeWizard();
begin

end;
и между
begin и end; вставляешь получившиеся строки
Код: Выделить весь код
  WizardForm.WelcomeLabel1.Left := ScaleX(10);
  WizardForm.WelcomeLabel1.Font.Color := clLime;

  WizardForm.WelcomeLabel2.Left := ScaleX(10);
  WizardForm.WelcomeLabel2.Font.Color := clRed;
Окончательный итог

Код: Выделить весь код
procedure InitializeWizard();
begin
  WizardForm.WelcomeLabel1.Left := ScaleX(10);
  WizardForm.WelcomeLabel1.Font.Color := clLime;

  WizardForm.WelcomeLabel2.Left := ScaleX(10);
  WizardForm.WelcomeLabel2.Font.Color := clRed;
end;

Последний раз редактировалось SatHan, 05-09-2012 в 05:56.

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

Отправлено: 05:49, 05-09-2012 | #811