Einzelnen Beitrag anzeigen

HolgerCW

Registriert seit: 28. Nov 2006
Ort: Marl
1.207 Beiträge
 
Delphi XE7 Enterprise
 
#1

Bild aus DB auslesen und in TImage anzeigen

  Alt 20. Nov 2008, 11:00
Datenbank: ORACLE • Version: 10 • Zugriff über: BDE
Hallo zusammen,

so kann ich ja ein Bild auslesen und auf der Festplatte speichern:

Delphi-Quellcode:
var blob:TStream;
begin
//Datei auslesen
blob:=mainform.IBtesttabelle.CreateBlobStream(IBtesttabelle.FieldByName('blobdata'),bmRead);
try
   blob.Seek(0,soFromBeginning);
   with TFileStream.Create('C:\testdatei.jpg',fmCreate) do
     try
      CopyFrom(blob,blob.Size);
      finally
             Free;
             end;
   finally
      blob.Free;
      end;
end;
Wie kann ich das Bild aus der DB direkt in einem TImage anzeigen ohne es vorher auf der Festplatte zu speichern ?
  Mit Zitat antworten Zitat