delphi中如何获得数据库里面的照片,应该用什么函数?谢谢
解决方案 »
- StrCopy(szNativeOs, @szRecv[0]); 出错~
- 那位好心的Delphi大哥帮个忙呗
- 请教怎么把一个grid中的数据都打印出来
- 帮我看看我的储过程
- 请问NMHTTP,在DELPHI7是什么控件?
- 我要如何打开编辑这个文件呀
- Delphi初學者的疑問??
- 提示怎么为空?有代码?
- 分数不高,还请各位DX们指点以下:如何用DELPHI控制excel的格式(比如第一列的宽度,第五行的高度),以及如何在WORD中生成表格,其中填入数据库的数据.
- delphi可以镶嵌c程序吗?怎么样进行镶嵌。先谢谢各位了
- 送分40分:为什么DELPHI6的源程序目录改变后无法打开
- 请问 RzCheckTree 控件怎样选中子结点的同时选中父结点?
直接用adoquery等就可以了
http://www.jiandande.com/html/bianchengjiqiao/Delphijiqiao/2010/0413/71.html
按理好像也有什么控件直接显示数据库里的照片的,网上说那个cxgrid就可以?
procedure TForm1.BitBtn1Click(Sender: TObject);
var picstream:Tblobstream;
pic:Tjpegimage;
jpegStream:TMemoryStream;
begin table1.Active:=true;
jpegStream:=TMemoryStream.Create;
(table1.fieldbyname('picture') as TBlobField).SaveToStream(JpegStream);
JpegStream.Position:=0;
try
image1.Picture.Graphic:=nil;
image1.Picture.Graphic:=TJpegImage.Create;
image1.Picture.Graphic.LoadFromStream(JpegStream); //读Jpeg
except
Image1.Picture.Bitmap.LoadFromStream(JpegStream); //读Bmp
end;
jpegStream.Free;
kye_jufeiG 正解