|
(CodeLib-Manager)
Registriert seit: 10. Jun 2002
4.648 Beiträge
Delphi XE Professional
|
Re: TShape - neue farbe Organge
1. Mai 2008, 21:38
z.B im OnCreate der Form:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
const
clOrange = $000080FF;
begin
Shape1.Brush.Color := clOrange;
end;
Thomas
|