Bild aus Datenbank in TImage Komponente

[DeddyH]

Das hatten wir doch schon. Dann erstelle halt eine Grafik im passenden Format (TBitmap, TJPEGImage or whatever), lade dort über den Stream den BLOB-Inhalt rein und weise sie dann dem Image zu.

[edit] Angenommen, in den BLOBs stehen Bitmaps:

Delphi-Quellcode:

        if qryGetDAtaBild.BlobSize > 0 then
        begin
          stBild := TMemoryStream.Create;
          try
            qryGetDAtaBild.SaveToStream(stBild); 
            bmp := TBitmap.Create;
            try
              bmp.LoadFromStream(stBild); 
              Frames.Image1.Picture.Assign(bmp);
            finally
              bmp.Free;
            end;
          finally
            stBild.Free;
          end;
        end;

Ungetestet, deshalb ohne Gewähr. [/edit]