高手注意！！！
我用delphi+SQL server 开发三层式应用系统。
请问如何实现图像的存储（图像读取已经解决了）？client-->server-->database;
望不吝指教，倾囊相送！！！
问题点数：66、回复次数：7Top
1 楼FoxSky（天狐）回复于 2001-11-19 13:05:07 得分 6
关注注Top
2 楼dongys_2000（dongys）回复于 2001-11-19 13:43:30 得分 15
用TBlobStream,TStream类试试把
Top
3 楼agui（阿贵: 高级图形用户界面）回复于 2001-11-19 14:46:51 得分 15
不能用 Assign, LoadFromStream, LoadFromFile 吗？
Top
4 楼_i_（活着就是为了折腾）回复于 2001-11-19 15:30:28 得分 0
我刚才用webconnection作连接，delta传送成功，但是速度奇慢。
谢谢大家参与，期待更好的解决方案！Top
5 楼cobi（我是小新）回复于 2001-11-19 16:28:08 得分 30
/保存
procedure TForm1.ImageIntoDBBitBtnClick(Sender: TObject);
begin
try
with Query1 do
begin
close;
sql.clear;
sql.add('insert into img (imga) values(:imag)');
end;
try
if FileName<>'' then
ParamByName('Img').LoadfromFile(FileName,ftGraphic)
else
ParamByName('Img') .asBlob:='';
Query1.ExecSQL;
except
ShowMessage('图片保存出错！');
exit;
end;
except
end;
end;
两层下是这样写的，三层的多一个提交（applyupdates）应该就可以了Top
6 楼_i_（活着就是为了折腾）回复于 2001-11-19 19:37:57 得分 0
我的三层式时这样的形式，
应用服务器只用到Ado_base: TADOConnection;
Com_base: TADOCommand;
Qry_base: TADOQuery;
Dsp_base: TDataSetProvider;Top
7 楼_i_（活着就是为了折腾）回复于 2001-11-19 19:46:54 得分 0
应用服务器端只有这四个控件（我需要干净统一的代码）
Ado_base: TADOConnection;连接数据库
Com_base: TADOCommand;写
Qry_base: TADOQuery;读
Dsp_base: TDataSetProvider;连接客户端
客户端Tclientdataset只用于显示，不用于写。
连接用Twebconnection.
所有存储都用应用服务器的interface--->method 实现。
客户端不能用Tdb***控件。
客户端不能出现诸如insert,append,post,applyupdate等
不知只用sql语句（应用服务器端）能否实现？Top
