Registriert seit: 26. Mai 2004
3.159 Beiträge
|
AW: farbe und hintergrundfarbe für anwendung auswählen
20. Jun 2011, 12:50
Nur schnell runtegetippt. Code gehört in das OnCreate-Ereignis ds Formulars. Dazu noch ein TColorDialog auf die Form ziehen und ab gehts
Delphi-Quellcode:
procedure TForm1.OnCreate();
begin
if (ColorDialog1.Execute()) then
Self.Color := ColorDialog1.Color;
end;
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
|