Thema: Delphi Timage aus Blobfeld

Einzelnen Beitrag anzeigen

WS1976
(Gast)

n/a Beiträge
 
#1

Timage aus Blobfeld

  Alt 9. Apr 2007, 12:01
Datenbank: ACCESS • Zugriff über: ADO Komponenten
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
  Mit Zitat antworten Zitat