delphi与SQL2000的图片读取
在一张goods表中有产品名称,规格,图片路径等字段,已经把图片的路径保存到goods表中,请问怎么样才能查询goods表时,查出的记录双击或是怎么样可以直接打开图片路径这个字段相对应的图片,谢谢
不知是什么格式的图片
bmp, jpeg格式的用TImage这个控件加载就可以了。
我发段代码给你.这是不管什么格式的只要你 Uses 上图片单元.如 uses jpeg
if Not OpenpictureDialog1.Execute then Exit;
ADotable1.Edit;
DBImage1.Picture.LoadfromFile(OpenPictureDialog1.FileName);
DBImage1.CopyToClipboard;
DBIMage1.PastefromClipboard;
Adotable1.Post;
用数据流把图片存储到数据库中，这样读取比较方便。
代码供你参考：
存储图片
Delphi(Pascal) code:
procedure TForm1.Button1Click(Sender: TObject);
var
ms: TMemoryStream;
jpg: TJpegImage;
begin
ms := TMemoryStream.Create;
jpg := TJpegImage.Create;
if dlgOpen1.Execute then
img1.Picture.LoadfromFile(dlgOpen1.FileName);
try
if img1.Picture.Graphic<>nil then
begin
//try
img1.Picture.Graphic.SaveToStream(ms);
//判断图片大小，如果图片太大则不允许
if ms.Size >1024*500 then
showmessage('图片太大不允许')
else
//提交图片
begin
qry1.Append;
TBlobField(qry1.FieldByName('pic')).LoadfromStream(ms);
qry1.Post;
end;
相关问答：
执行的顺序：
1）文件浏览框（选择文件使用）
选择好文件后
点击一个导入按钮的时候 ，把上面上传框里的csv文件以一个ID为文件名，上传到**/**文件夹下
2）读取这个文件夹下的csv的文件，转换成sql
3 ......
type Exception report
message
description The server encountered an internal error () that prevented it from fulfilling this request.
exception
org.apache.jas ......
就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......
hongqi162、windindance
此2人长期不在线，特别是windindance
更换有能力的人上
hongqi162还是经常上来转转的
引用
更换有能力的人上
其实也不是什么能力的原因，主要可能是时间问题吧
工作的还要上班，学� ......
sql的软件在哪里可以下啊！在网上找了蛮多都用不了啊
随便搞一D版吧，
迅雷第一个就可以用
2000,2005都这样
http://119.147.41.16/down?cid=0698C2D64D7D637D90A6D2482298E6717D4F15CD&t=2&fmt=-1 ......
