wir haben also eine auswahl auf dem formular
http://img107.imageshack.us/img107/4...benannt4tt.jpg
und eine konstante für dern hintergrund der canvas fläche!
die frage ist nun: wie fang ich es ab dass Mindestens eine der 2 Farben (Randfarbe und Füllfarbe) ist ungleich der Hintergrundfarbe der Zeichenfläche (einstellbar).
hab das so versucht aber irgendwie kalppt das nich wirklich
Delphi-Quellcode:
function ColorTest(PenColor, BrushColor : TColor):boolean;
begin
if (PenColor = cHintergrundFarbe) and (BrushColor = cHintergrundFarbe) then
ColorTest := true;
end;
und dann
Delphi-Quellcode:
If ColorTest(ClBox_Pen.Selected, ClBox_Back.Selected)= false then
PB_Bild.Canvas.Pen.Color := ClBox_Pen.DefaultColorColor; //Randfarbe
PB_Bild.Canvas.Brush.Color := ClBox_Back.DefaultColorColor; //Fullfarbe
der zeichnet zwar mit der
standart eingestellten farbe, aber ich hätte es besser das er garnet zeichnen würde!
wäre es möglich?