跪求一个在SQL2000中存储图片地址和DELPHI读取图片的例子！

Question

在数据库中存储图片的地址，并在程序运行时读取图片``给你代码哈

Answer 1

我的意思是将图片的地址存储到SQL2000数据库中,然后程序执行时显示出来图片,最好是用到combobox组件.帮帮忙吧,我现在头都大了,资料看的太多了,有点乱,希望大家能把代码写出来.要是能把程序发到我E-MAIL更好了[email protected]

Answer 2

可以在数据库中存图片的FTP地址,然后再根据FTP地址把它读出来,显示出来就可以啦,以前做过,这会手头上没有代码,参考INDY那组控件的例子吧.

Answer 3

你可以用 Edit1 和 button1 控件來選擇圖片地址並將圖片地址保存到數據庫内
button1 ONClick 事件:var
        OpenDlg: TOpenDialog;
begin
        OpenDlg := TOpenDialog.Create(Application);
        try
                OpenDlg.FileName := Edit1.Text;
                OpenDlg.Filter := 'Image Files (*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf|All Files(*.*)|*.*';
                OpenDlg.Options := OpenDlg.Options + [ofPathMustExist];
                if OpenDlg.Execute then
                begin
                        Edit1.Text := OpenDlg.Filename;
                        Image1(控件).Picture.LoadFromFile(Edit1h.Text);
                end;
        finally
                OpenDlg.Free;
        end;
因該沒問題吧`

Answer 4

在数据库当中存图片地址是一种好的方法，但是需要的是有一个全局可以访问，也就是任何可以访问到该数据库的机器都能访问的一个文件站点（包括FTP/HTTP，或者自定义的协议接口）。在一般的应用当中不提倡使用，除非是网站服务，存入的是图片在该网站的URL。

Answer 5

说了半天，也没个完整的代码。我的数据库中2列，ID和PICTURE  怎么添加地址我现在还不太懂`

Answer 6

首先要定义一个TStringStream变量,把储存的图片保存到流中