Вопрос Текст на страницах

Yaroslav950

Участник
@DEAD KING, Создавать на каждой странице (а точнее показ). [CustomMessages] - вам уже показали как выглядит.
Код:
var
PageNameLabel,.........:TLabel;
procedure Wizard;
begin
PageNameLabel:=TLabel.Create(WizardForm);
  with PageNameLabel do begin
    AutoSize:= False;
    SetBounds(ScaleX(70), ScaleY(185), ScaleX(400), ScaleY(30));
    Transparent:=True;
    Font.Name:= 'Georgia';
    Font.Size:= 13;
    Font.Color:=$FFFFFF;
    Font.Style:=[fsBold];
    Parent:=WizardForm;
  end;

procedure InitializeWizard;
begin
Wizard;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
PageNameLabel.Hide; \\не показ текста на форме
case CurPageID of
  wpWelcome:
PageNameLabel.Show;\\показ текста на опредленной странице.
end;
end;
 
Сверху