Delphi-PRAXiS - Delphi TFontDialog.Caption?

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi TFontDialog.Caption? (https://www.delphipraxis.net/73547-tfontdialog-caption.html)

PeterPanino

19. Jul 2006 17:46

TFontDialog.Caption?

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

19. Jul 2006 18:35

Re: TFontDialog.Caption?

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

19. Jul 2006 18:56

Re: TFontDialog.Caption?

Zitat:

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!

Alle Zeitangaben in WEZ +1. Es ist jetzt 17:38 Uhr.