100分相赠：如何做一个系统，能读取和保存图片。开发工具Delphi，数据库用Access

Question

各位高手，有劳了，讲讲思路和做法，给出代码更好。

Answer 1

[email protected]
基本可用就给分

Answer 2

也给我一份吧.感谢中:)
[email protected]

Answer 3

也给我一份吧.感谢了:)[email protected]

Answer 4

TBlobField(AdoTable1.FieldByName('picture')).LoadFromFile('....');
TBlobField(AdoTable1.FieldByName('picture')).SaveToFile('....');

Answer 5

你所需要的是我正在做的一个项目中的一个环节，我已经实现了，恰好为了方便起见，用的也是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控件咯！
上面的代码可以实现将图片名，存储路径，图片本身，图片容量存入数据库，其他自己扩展！

Answer 6

先用ACCESS建库 ,配BDE和ODBC  ,,用DATABASE控件进行连接,,ACCESS中只存入路径;
我做过这眼样的系统,如果有红分很乐意奉献原码;

Answer 7

用ado连接更方便一些。把图片直接存入数据库更好，管理起来更方便。