Delphi高手!
如何把Delphi 中的 Image 控件的图像保存到Sql Server 2000中,Sql Server 2000中的字段类型为Images!存入之后又如何把Sql Server 2000中的图片取出来,显示在Image 控件上!
请高手指教!谢谢!
如何把Delphi 中的 Image 控件的图像保存到Sql Server 2000中,Sql Server 2000中的字段类型为Images!存入之后又如何把Sql Server 2000中的图片取出来,显示在Image 控件上!
请高手指教!谢谢!
2.删除:fieldByName('img').value:=nil;
3.显示:image1.Picture.Assign(tblobfield(query.fieldbyname('img'));
把图片保存到image字段中
var myfilestream:tfilestream;
myblob:tblobfield;
begin
adoquery1.edit;
picturepath:='c:\a.bmp';
myfilestream:=tfilestream.Create(picturepath,fmopenread);
myblob:=tblobfield(adoquery1.FieldByName('Photo'));
myblob.LoadFromStream(myfilestream);
myfilestream.Free;
adoquery1.Post;
把字段中的图片读出到image控件中
Image1.Picture.bitmap.assign(tblobfield(adoquery1.fieldbyname('Photo')));