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;
Das Ganze in einen TRY-Block zu verpacken ist natürlich wesentlich besser, es könnte ja sein, daß beim Laden was schiefläuft.