Registriert seit: 23. Sep 2002
Ort: Frankfurt am Main (in der Nähe)
1.840 Beiträge
Delphi 10 Seattle Enterprise
|
Re: Beschriftung im Colordialog ändern?
14. Dez 2004, 16:26
Zitat von GeorgPeifer:
damit konnte ich zumindest mal den Titel des Dialogs ändern .. aber alles andere bekomme ich nicht geändert
Code:
SetWindowText(ColorDialog1.Handle,PChar('Hallo Das ist ein neuer Text'));
Hmmm, warum?
Geht doch:
Delphi-Quellcode:
...
procedure TForm1.ColorDialog1Show(Sender: TObject);
begin
SetWindowText(GetDlgItem(ColorDialog1.Handle, idOk), '&Fertig');
SetWindowText(GetDlgItem(ColorDialog1.Handle, idCancel), '&Wegmache');
SetWindowText(ColorDialog1.Handle, 'Bunt');
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ColorDialog1.Execute
end;
...
(°¿°) MaBuSE - proud to be a DP member
(°¿°) MaBuSE - proud to be a "Rüsselmops" ;-)
|
|
Zitat
|