Verständnisfrage: TImage

[Bummi]

Da Du mit dem automatisch generierten Format in clWhite nicht glücklich bist....

Delphi-Quellcode:

Procedure SetEmptyBitmap(i:TImage;C:TColor);
var
  bmp:TBitmap;
begin
  bmp := TBitmap.Create;
  try
    bmp.PixelFormat := pf32Bit;
    bmp.Canvas.Brush.Color := C;
    bmp.Width := i.Width;
    bmp.Height := i.Height;
    i.Picture.Assign(BMP);
  finally
    bmp.Free;
  end;
end;

.....
.....
und dann Statt
 panel1.Picture.Bitmap:=nil;
>>
SetEmptyBitmap(Panel1,clBlack);

BTW: wie kommt man auf die Idee ein TImage Panel1 zu benennen