Bild wird nicht in drawgrid geladen

[DeddyH]

Da Delphi nicht über einen GC verfügt, sollte man die angeforderten Ressourcen nach Gebrauch auch wieder freigeben.

Delphi-Quellcode:

procedure TFormMain.DrawGrid1Click(Sender: TObject);
var
   bild:TPicture;
begin
   bild:=TPicture.Create;
   try
      bild.LoadFromFile('logo.bmp');
      DrawGrid1.Canvas.Draw(Feld.CellRect(0,0).left,Feld.CellRect(0,0).top,bild.Graphic);
   finally
      bild.Free;
   end;
end;