ColorDialog und Label

[Neutral General]

Delphi-Quellcode:

with Bild.Canvas do begin
  if ColorDialog1.Execute then begin
   Pen.Color:=ColorDialog1.Color;
   Label2.Font.Color:= ColorDialog1.Color;
   Label2.Caption := ColorToString(ColorDialog1.Color);
  end;
  //...
end;

so müsste es gehn