＋设为首页 ＋添加到收藏夹
各位高手，有劳了，讲讲思路和做法，给出代码更好。
TBlobField(AdoTable1.FieldByName(picture)).LoadFromFile(....);
TBlobField(AdoTable1.FieldByName(picture)).SaveToFile(....);
你所需要的是我正在做的一个项目中的一个环节，我已经实现了，恰好为了方便起见，用的也是access数据库，由于项目总管不让泄漏全部代码，我只能给你一些提示咯！
with adotable1 do begin
open;
insert;
fieldbyname(name).asstring:=extractfilename(FileName);
fieldbyname(path).asstring:=filename;
(FieldByName(picture) as TBlobField).LoadFromFile(FileName);
Image1.Picture.LoadFromFile(FileName);
try
ff:=fileopen(filename,fmopenread);
size:=fileseek(ff,0,2);
finally
fileclose(ff);
end;
fieldbyname(volume(k)).asstring:=formatfloat(0.00,size/1024);
post;
end;
由于我做的是视频捕捉，所以使用了videograbber控件，这样会带来方便，其中filename为图片存储路径，如果你只是想从文件夹中的一张图片存入数据库，直接用opendialog控件咯！
上面的代码可以实现将图片名，存储路径，图片本身，图片容量存入数据库，其他自己扩展！
先用ACCESS建库 ,配BDE和ODBC ,,用DATABASE控件进行连接,,ACCESS中只存入路径;
我做过这眼样的系统,如果有红分很乐意奉献原码;
