Brush.Style & Color

[Moony]

Hallo zusammen,

habe das Problem, daß ich über ein TImage wie folgt versuche ein Rechteck auf eine Fläche zu zeichnen:

Delphi-Quellcode:

  Image.Canvas.Brush.Color := clWhite;
Image.Canvas.Brush.Style := bsFDiagonal;
Image.Canvas.FillRect(rect(0,0,ImageMag.Width,ImageMag.Height));

Leider wird der Hintergrund schwarz und die Diagonalen weiß gezeichnet. Gibt es eine Möglichkeit den umgekehrten Fall zu erzielen, also Hintergrund weiß bzw. transparent und die Diagonalen schwarz?

Ich habe es schon mit Image.Pen.Mode := pmXor; davor versucht, leider ohne Erfolg. Scheinbr hat die Funktion keine Einwirkung auf das Farbverhalten.

Ich hoffe mir kann da jemand weiterhelfen. Thanks im Vorraus.

gruß, moony