Delphi DB ( Blob ) -> TImage

Thema durchsuchen

Ansicht

Themen-Optionen

DB ( Blob ) -> TImage

Ein Thema von Tau · begonnen am 12. Dez 2004 · letzter Beitrag vom 12. Dez 2004

Antwort

ol1uw

Registriert seit: 24. Jul 2004
Ort: Freiberg
70 Beiträge

Delphi 11 Alexandria

Re: DB ( Blob ) -> TImage

12. Dez 2004, 21:33

Hallo

Versuchmal

markieren

Delphi-Quellcode:

			      jpg := TJPEGImage.Create;

      if (ADOQuery.FindField('BILD') as TBlobField).BlobSize > 0 then

      begin

        jpg.Assign(ADOQuery.FindField('BILD') as TBlobField);

        Bild.Picture.Bitmap.Assign(jpg);

      end;