Timage aus Blobfeld

Hallo,

ein Icon (.ico) wurde in ein Access Blobfeld gespeichert.
wie kriege ich direkt aus Blobfeld wieder ein Timage?

Delphi-Quellcode:

			procedure TForm1.Button3Click(Sender: TObject);

var

  blobF : TBlobField;

  blobstream:tstream;

  fname:string;

begin

   mytable.Active:=true;

   myTable.first;

   fname:=myTable.FieldByName('name').AsString;

   blobF := mytable.FieldByName('Picture') as TBlobField;

   blobf.SaveToFile('test.ico');

   s.LoadFromFile('test.ico');

   image1.Picture.LoadFromFile('test.ico');

end;

Bisher mache ich das über den Umweg abspeichern auf Platte.
gehts auch einfacher?

Danke

Timage aus Blobfeld

Timage aus Blobfeld

Forumregeln