Bitmap-Brush.Color Änderung hat keinen Effekt

[zarcaphii]

Hallo leibe Gemeinde.

Ich male im Moment mit Fingerfarben (MoveTo, LineTo) auf einigen Bitmaps rum. Habe auch schon TImage ausprobiert, da sitzt ja auch eine Bitmap hinter.

Mein Problem ist, dass ich die Zeichenfarbe zwar ändern kann, dies keinerlei Auswirkungen hat... Habe ich beim Brush vielleicht noch etwas zu beachten?

Hier mal der Code:

Delphi-Quellcode:

  
  fBitmap:=TBitmap.Create;
  fBitmap.Monochrome:=false;
  fBitmap.Height:=480;
  fBitmap.Width:=640;

  fBitmap.Canvas.Brush.Color:=clRed; 
  //Debugger zeigt: Wert von Color ist jetzt 255 (--> 00,00,FF), passt

  fBitmap.Canvas.MoveTo(0,0); 
  fBitmap.Canvas.LineTo(639,479);

  fBitmap.Canvas.Brush.Color:=clWhite;
  //Debugger zeigt: Wert von Color ist jetzt 16777215 (--> FF,FF,FF), passt

  fBitmap.Canvas.MoveTo(0,0); 
  fBitmap.Canvas.LineTo(639,479);

  fBitmap.SaveToFile('C:/test.bmp');
  //test.bmp zeigt eine schwarze Diagonale auf weißem Grund

  Image.Picture.Bitmap:=Bitmap;
  //Anzeige auf der Form wie test.bmp

Ich vermute, dass es nur eine Kleinigkeit ist. Übrigens benutze ich Turbo Delphi.

Vielen Dank schonmal bis hier hin fürs Lesen. Ein passender Vorschlag wäre toll

[DeddyH]

Setz statt Brush.Color mal Pen.Color.

[zarcaphii]

-.- Kleinigkeit, ich bin Hellseher.

Vielen Dank, das wars!

Wozu ist denn Brush da, wenn der Pen zu malen benutzt wird?

[DeddyH]

Brush.Color ist die Füllfarbe, Pen.Color die Malfarbe, mal lax ausgedrückt. In der OH steht aber in der Regel, welche Farbe bei welcher Methode zum Einsatz kommt.