query.append执行前的郁闷

heroren 2004-12-26 04:32:35

Dbgrid数据显示表里的内容

Toobar1按钮是query.append事件

可是每次点击Toobar1按钮的时候总是有Error

dxlocate.pas 单元里面的函数（返回bool值）报错

在线等待急急急！！！！！！！！！！！！！！！！！

...全文

112 8 打赏收藏转发到动态举报

写回复

用AI写文章

8 条回复

切换为时间正序

请发表友善的回复…

发表回复

polly_110 2004-12-26

打赏
举报

78hgdong 2004-12-26

打赏
举报

上面的多一个分号',改正为:
adoquery1.sql.add('insert into youTable(...) values(...)');

78hgdong 2004-12-26

打赏
举报

adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('insert into youTable(...)' values(...)');
adoquery1.parameters.addparameters;
adoquery1.parameters[0].name:='username';
adoquery1.parameters[0].datatype:=ftstring;
adoquery1.parameters[0].direction:=pdinput;
adoquery1.parameters[0].value:=Edit1.text;
...
adoquery1.execsql;

heroren 2004-12-26

打赏
举报

是单表查询阿

SQL语句很简单 select * from bcustomerbase

dbgrid-->datasourse-->adoquery 的结构

就是想增加纪录的时候出现上面的错误整整一个下午了还没有找到原因阿！！！！！！！

等待中

大侠帮忙阿！！

Kevin_Lmx 2004-12-26

打赏
举报

你的Query的SQL是不是多表查询的？如果是，那用TUpdateSQL组件做添加操作

heroren 2004-12-26

打赏
举报

每次想增加纪录的时候我用append事件
可是我跟踪调试的时候有下面的语句

unit dxlocate;

interface
uses DB;

function DBTrDataSetLocate(DataSet: TDataSet; AFieldName: string; AValue: Variant; AOptions: TLocateOptions): Boolean;

implementation

function DBTrDataSetLocate(DataSet: TDataSet; AFieldName: string; AValue: Variant; AOptions: TLocateOptions): Boolean;
begin
-------------//Result := DataSet.Locate(AFieldName, AValue, AOptions); ---〉ERROR
end;

end.

Kevin_Lmx 2004-12-26