［急，在线等］delphi sql2000 图片
1、路径 imgPath:string;//比如已经得到了图片路径
2、SQL2000 数据库 表名 ttbtestimg 字段名 img 字段类型image
3、请给一个完整代码，将此路径下的图片，存入数据库，相应表的相应字段中
4、请给出一段完整代码，将此表中的图片显示在图片控件上
4、请给出注释
5、程序一通，立即给分
这个有很多人问过,给你一个参考吧
http://topic.csdn.net/t/20051215/18/4461795.html
.....程序还是要自己写的......
procedure TForm1.Button1Click(Sender: TObject);
var
picstream:tadoblobstream;
bmppic:tbitmap;
jpgpic:tjpegimage;
bmpstream:TMemoryStream;
OpenPicDialog:TOpenPictureDialog;
begin
try
OpenPicDialog:=TOpenPictureDialog.Create(nil);
OpenPicDialog.Filter:='All *.jpg;|*.jpg;)';
with AdoQuery1 do
begin
close;
sql.text := 'Insert into ttbtestimg(id) values(1)';
ExecSql;
SQL.Text := 'select id,img from ttbtestimg with(nolock) where id=1';
Open;
Edit;
if OpenPicDialog.Execute then
begin
jpgpic:=tjpegimage.Create;
bmppic:
相关问答：
将一个表21~30删除，sql语句怎么写
这个太笼统了，是排序后的第21条到30条记录删除还是某一列值在21到30之间的删除啊？
21-30是什么意思？字段的话就delete from table1 where col1>=21 and col1<=30
指� ......
执行的顺序：
1）文件浏览框（选择文件使用）
选择好文件后
点击一个导入按钮的时候 ，把上面上传框里的csv文件以一个ID为文件名，上传到**/**文件夹下
2）读取这个文件夹下的csv的文件，转换成sql
3 ......
access 中执行sql update语句时有时候成功有时候不成功，但是access中不出错误信息，不知道是什么原因，有哪位大侠知道，请帮忙啊
贴SQL语句，检查表、字段的有效性设置
sql 在查询分析器里面 执行很正常
是 ......
就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......
我写了个小程序，上面添加了一个shockwaveflash控件，然后在movie里写入swf文件的路径，然后执行没有问题。
当我把这个程序转移到另一台电脑执行时， shockwaveflash 控件显示空白。也就是没有加载那个swf文件。 ......
