TFontDialog.Caption?

[PeterPanino]

Die Titelleiste eines TFontDialog zeigt immer 'Schriftart' an.

Wie kann man den Text in der Titelleiste eines TFontDialog definieren?

Die Eigenschaft TFontDialog.Caption ist nämlich nicht vorhanden.

[marabu]

Hallo Peter,

probiere es über das Ereignis OnShow() des Dialogs:

Delphi-Quellcode:

procedure TDemoForm.FontDialogShow(Sender: TObject);
begin
  with Sender as TFontDialog do
    SetWindowText(Handle, 'So geht es');
end;

Grüße vom marabu

[PeterPanino]

Zitat von marabu:

Hallo Peter,

probiere es über das Ereignis OnShow() des Dialogs:

Delphi-Quellcode:

procedure TDemoForm.FontDialogShow(Sender: TObject);
begin
  with Sender as TFontDialog do
    SetWindowText(Handle, 'So geht es');
end;

Grüße vom marabu

Wunderbar!! Herzlichen Dank und einen schönen Tag noch!