Also ich habe das jetzt mal versucht zu löschen, jedoch funktioniert das auch nicht wie ichs gern möchte. Ich habe folgenden Code im MouseMove-Ereignis:
Delphi-Quellcode:
if Klick then begin
with imgZeichenflaeche.Canvas do begin
Pen.Mode := pmNotXor;
Pen.Color := clWhite;
Rectangle(x1,y1,x2,y2);
Pen.Color := Farbe;
Rectangle(PenPos.X,Penpos.Y,X,Y);
x1 := PenPos.X;
y1 := PenPos.Y;
x2 := X;
y2 := Y;
end;{with-anweisung}
end;
Es ist immernoch wie vorher das alte Rectangle zu sehen. Warum? Ich übermale es doch mit einem weißen, oder etwa nicht?