TFontDialog.Caption?

[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