General: D5/D6 Error with DB-Access
Q: —- I have two query connect to DBDemos. Query1.sql select name from country Query2.sql (connect to query1) select * from country where…
JPEG: Read/write JPEG from/to Database
[code lang=”delphi”]PEGStream : TBLOBStream; JPEGImage : TJPEGImage; JPegImage := TJPEGImage.Create; JPEGStream := TBLOBStream.Create(TBLOBField(Table1.FieldByName(‘JPGImage’)),bmRead); JPegImage.Loadfromstream(JPEGSTREAM); JPegStream.Free [/code] [tags]Delphi, Database[/tags]
JPEG: Save JPG in Database (Paradox)
[code lang=”delphi”]Procedure LoadJpeg; Var str : tblobstream; img:Tjpegimage; begin Str := Tblobstream.Create(Table1.fieldbyname(‘Yourfield’); img:=tjpegimage.create; img.loadfromstream(str);// or image1.picture.assign(img); img.free; str.free; end; Procedure SaveJpeg; Var str…