Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi ColorDialog

**aurikel_Max**

Zitat von DeddyH:

Versuch es mal mit

Delphi-Quellcode:

			procedure TForm1.btColorClick(Sender: TObject);

begin

  if ColorDialog1.Execute then

    Canvas.Pen.Color := ColorDialog1.Color;

end;

Klappt, Dankeschön.

aurikel_Max Registriert seit: 9. Okt 2009 86 Beiträge	#3 Re: ColorDialog - Color richtig Pen.Color zuweisen 14. Mär 2010, 17:10 Zitat von DeddyH: Versuch es mal mit markieren Delphi-Quellcode: procedure TForm1.btColorClick(Sender: TObject); begin if ColorDialog1.Execute then Canvas.Pen.Color := ColorDialog1.Color; end; Klappt, Dankeschön. Max
	Zitat