怎么将图片插入数据库 怎么将图片和图片名字 同时插入数据库,或更改现有的数据,把图片插入。详细! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 以JPG和数据库为关键字搜一下,一搜一大把 数据库两个字段,一个TEXT,一个Image(SQL),然后增加,如果是把文件名和内容同时放一个文件里,那样就麻烦多了, 存到数据库varpjpg:tjpegimage;pic:TMemoryStream;beginpjpg:=tjpegimage.Create;pjpg.LoadFromFile(F:\JPG.jpg);pic:=TMemoryStream.Create;pjpg.SaveToStream(pic);pic.Position:=0;TBlobField(dataset.FieldByName('Img')).LoadFromStream(pic);dataset.post;pic.Free;pjpg.free;end;从数据库取出varpjpg:tjpegimage;pic:TMemoryStream;beginpjpg:=tjpegimage.Create;pic:=TMemoryStream.Create;TBlobField(dataset.FieldByName('Img')).savetoStream(pic);pic.positon:=0;pjpeg.LoadFromStream(pic);image.graphi.bmp.assign(pjpeg);end;end; DELPHI键盘失灵 procedure TForm1.Action1Execute(Sender: TObject); 什麽時候觸發? 怎么才能找到一个项目做呢? 关于dxdbgrid问题(在线等!) 如何控制Word文档中的文本框?? 有关控制台程序和windows程序的问题 请问在2000下怎么重起机器啊? 关于在table1中保存图片的问题 StringGrid的问题? 关于通用报表的设计,欢迎讨论 散分 我用Delphi操作Access2000数据库,发现删除数据库中的大量记录后,数据库文件大小不怎么变化,打开access发现那些记录确实被删除了。请问
var
pjpg:tjpegimage;
pic:TMemoryStream;
begin
pjpg:=tjpegimage.Create;
pjpg.LoadFromFile(F:\JPG.jpg);
pic:=TMemoryStream.Create;
pjpg.SaveToStream(pic);
pic.Position:=0;
TBlobField(dataset.FieldByName('Img')).LoadFromStream(pic);
dataset.post;
pic.Free;
pjpg.free;
end;
从数据库取出
var
pjpg:tjpegimage;
pic:TMemoryStream;
begin
pjpg:=tjpegimage.Create;
pic:=TMemoryStream.Create;
TBlobField(dataset.FieldByName('Img')).savetoStream(pic);
pic.positon:=0;
pjpeg.LoadFromStream(pic);
image.graphi.bmp.assign(pjpeg);
end;end;