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

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

Аватара для Shift85

Старожил


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

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


Цитата Kashtan007:
Как сделать эти 2 строки прозрачные? »
Пример.

Код: Выделить весь код
SoftLabel:= TLabel.Create(WizardForm);
  with SoftLabel do begin
    Parent:=WizardForm;
    SetBounds(ScaleX(280), ScaleY(316), ScaleX(450), ScaleY(17));
    AutoSize:=False
    WordWrap:=True
    Transparent:=True
    Font.Name:= 'Tahoma';
    Font.Size:= 7;
    Font.Color:= clGray;
    Font.Style := [fsBold];
    OnClick:= @SoftLabelClick;
    Caption:= ExpandConstant('{cm:SoftTask}');
  end;
Результат.

Последний раз редактировалось Shift85, 30-09-2014 в 13:22.

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

Отправлено: 18:10, 13-07-2014 | #1123