pmXor hat ein Farbverhalten, nur fällt das bei Schwarz/Weiß nicht so ganz auf.
Delphi-Quellcode:
Image.Canvas.Brush.Color := clWhite;
Image.Canvas.Brush.Style := bsSolid;
Image.Canvas.FillRect(rect(0,0,ImageMag.Width,ImageMag.Height));
Image.Canvas.Brush.Color := clBlack;
Image.Canvas.Brush.Style := bsFDiagonal;
Image.Canvas.FillRect(rect(0,0,ImageMag.Width,ImageMag.Height));
Der Hintergrund wird nicht Schwarz gezeichnet, der ist standardmäßig schwarz.
Es werden nur die Diagonalen gezeichnet, für welche du ja clWhite gewählt hast.
Also vorher alles Weiß machen und dann noch die schwarzen Linien drauf
