Canvas.Pen.Mode -> Zurücksetzen?

[turboPASCAL]

Das musst Du selber machen. z.B.:

Delphi-Quellcode:

...
var OldPenMode: TPenMode;
begin
  OldPenMode := PaintBox1.Canvas.Pen.Mode;
  PaintBox1.Canvas.Pen.Mode := pmXor;
  ... 
  PaintBox1.Canvas.Rectangle(10, 10, 40, 40);
  ...
  PaintBox1.Canvas.Pen.Mode := OldPenMode;
end;

pmCopy - ist glaube ich die Standarteinstellung.