问个菜鸟问题,请勿见笑,在线急等,望指教 在paradox里怎么在字段里存图片啊? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 字段设置为Graphic类型用Blob大字段存取 DataCellBlob := TBlobField(GQuery.FieldByName('CellFile')); if not DataCellBlob.IsNull then {如果不为空,清除原有文件} begin GQuery.Close; GQuery.SQL.Text := 'UPDATE 检查项目 SET CellFile = :CllFile ' + ' WHERE Inspection_ID = :TID'; GQuery.Parameters.ParamByName('CllFile').DataType := ftBlob; GQuery.Parameters.ParamByName('CllFile').Value := ''; GQuery.Parameters.ParamByName('TID').Value := vstrInspection_ID; GQuery.ExecSQL; end; GQuery.Close; GQuery.SQL.Text := 'UPDATE 检查项目 SET CellFile = :CllFile ' + ' WHERE Inspection_ID = :TID'; GQuery.Parameters.ParamByName('CllFile').DataType := ftBlob; GQuery.Parameters.ParamByName('CllFile').LoadFromFile(StrFilePath,ftBlob); GQuery.Parameters.ParamByName('TID').Value := vstrInspection_ID; GQuery.ExecSQL; 比如说我建了一个paradox数据表,字段是考号和照片,考号是long型,照片是graphic型.我如果想向表中插入数据,比如考号为101,照片为pic101.jpg,该如何做啊?我看到database desktop的帮助文件里提到用copy to graphic file dialog box,但我不知如何操作,清指教. 让某程序标题不显示在任务栏 自动化COM开发-如果在客户端关闭时不自动destroy服务器端 TreeView节点着色问题 DELPHI临时表问题 怎么使窗体的cursor统统改掉? 求一条SELECT语句? 各位高手,菜鸟我再问一个第三方组件的问题 Delphi如何调用VC写的DLL,(如何通过传递地址方式来调用VC写的Function?)有点麻烦! 急急急!!!怎么控制在dbgrid中显示的记录个数 有关CreateProcess的问题 急问高手,关于改变鼠标形状。 再求問關於QRCompositeReport的用法
用Blob大字段存取
if not DataCellBlob.IsNull then {如果不为空,清除原有文件}
begin
GQuery.Close;
GQuery.SQL.Text := 'UPDATE 检查项目 SET CellFile = :CllFile ' +
' WHERE Inspection_ID = :TID';
GQuery.Parameters.ParamByName('CllFile').DataType := ftBlob;
GQuery.Parameters.ParamByName('CllFile').Value := '';
GQuery.Parameters.ParamByName('TID').Value := vstrInspection_ID;
GQuery.ExecSQL;
end;
GQuery.SQL.Text := 'UPDATE 检查项目 SET CellFile = :CllFile ' +
' WHERE Inspection_ID = :TID';
GQuery.Parameters.ParamByName('CllFile').DataType := ftBlob;
GQuery.Parameters.ParamByName('CllFile').LoadFromFile(StrFilePath,ftBlob);
GQuery.Parameters.ParamByName('TID').Value := vstrInspection_ID;
GQuery.ExecSQL;
我看到database desktop的帮助文件里提到用copy to graphic file dialog box,但我不知如何操作,清指教.