canvas brush color clBlack geht nicht

[EWeiss]

Nochmal step by step

Delphi-Quellcode:

var
  Bitmap: TBitmap;
begin
  Bitmap := TBitmap.Create;
  // zeichne oder mach was mit Bitmap 
  // ...
  // Speicher Freigeben
  Bitmap.Free;
  // oder Speicher Freigeben und das Object TBitmap auf Nil setzen. 
  FreeAndNil(Bitmap);
end

gruss