Delphi使用TADOQuery时:不正常地定义参数对象。提供了不一致或不完整的信息。

在Delphi中提交一条SQL语句,系统出现了如下的错误:

---------------------------
Error
---------------------------
不正常地定义参数对象。提供了不一致或不完整的信息。
UPDATE xtCxzb SET cxzbName='公户档案'
      ,cxzbCxlx=0
      ,cxzbcxdx='GH30档案'
      ,cxzbBBMB=''
      ,cxzbDrpz='<?xml version="1.0" encoding="gb2312"?>
<GH30档案><当前表字段><默认配置><单位ID 可空="False" 字段类型="uniqueidentifier" 主键状态="Yes" 条件语句="" 字段公式="单位ID" 字段值="2006-10-25 15:27:43"/><单位名称 可空="True" 字段类型="varchar" 主键状态="No" 条件语句="" 字段公式="单位名称" 字段值="2006-10-25 15:27:43"/><单位代码 可空="False" 字段类型="varchar" 主键状态="No" 条件语句="" 字段公式="单位代码" 字段值="2006-10-25 15:27:43"/><地址 可空="True" 字段类型="varchar" 主键状态="No" 条件语句="" 字段公式="地址" 字段值="2006-10-25 15:27:43"/><开户行 可空="True" 字段类型="varchar" 主键状态="No" 条件语句="" 字段公式="开户行" 字段值="2006-10-25 15:27:43"/><单位帐号 可空="True" 字段类型="varchar" 主键状态="No" 条件语句="" 字段公式="单位帐号" 字段值="2006-10-25 15:27:43"/><联系人 可空="True" 字段类型="varchar" 主键状态="No" 条件语句="" 字段公式="联系人" 字段值="2006-10-25 15:27:43"/><联系电话 可空="True" 字段类型="varchar" 主键状态="No" 条件语句="" 字段公式="联系电话" 字段值="2006-10-25 15:27:43"/><装表日期 可空="True" 字段类型="smalldatetime" 主键状态="No" 条件语句="" 字段公式="装表日期" 字段值="2006-10-25 15:27:43"/><单位隐码 可空="True" 字段类型="varchar" 主键状态="No" 条件语句="" 字段公式="单位隐码" 字段值="2006-10-25 15:27:43"/></默认配置></当前表字段><主键设置/></GH30档案>
'
   WHERE cxzbid00=187
---------------------------
OK  
---------------------------

本以为是SQL太长了,无法存入数据库中,Google检查,没有发现错误,用“Delphi+不正常地定义参数对象。提供了不一致或不完整的信息。”关键字进行检查,发现有提示,说是由于TADOQuery对象把":"后的字符当作变量来使用,导致数据识别错误。只要把TADOQuery.ParamCheck设置为False即可。一试,果然如此。


 
  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 3
    评论
Delphi 中,您可以使用 TListView 和 TADOQuery 组件来实现数据库查询结果的显示。下面是一个示例的方法和代码: 1. 在窗体上放置 TListView 和 TADOQuery 组件,并设置相关属性。 2. 在窗体的 OnCreate 事件中,创建并打开 ADOQuery 组件,并执行查询语句。 ```delphi procedure TForm1.FormCreate(Sender: TObject); begin ADOQuery1.Connection := ADOConnection1; // 设置 ADOQuery 的连接 ADOQuery1.SQL.Text := 'SELECT * FROM YourTable'; // 设置查询语句 ADOQuery1.Open; // 执行查询 end; ``` 3. 在窗体的 OnShow 事件中,将查询结果显示在 ListView 中。 ```delphi procedure TForm1.FormShow(Sender: TObject); var ListItem: TListItem; begin ListView1.Items.Clear; // 清空 ListView 中的项 // 遍历查询结果集,将每条记录显示在 ListView 中 ADOQuery1.First; while not ADOQuery1.Eof do begin ListItem := ListView1.Items.Add; ListItem.Caption := ADOQuery1.FieldByName('Field1').AsString; // 第一列数据 ListItem.SubItems.Add(ADOQuery1.FieldByName('Field2').AsString); // 第二列数据 ADOQuery1.Next; end; end; ``` 在这个例子中,我们使用 TListView 的 Items 属性来添加每个查询结果的行,并使用 Caption 和 SubItems 属性来设置每列的数据。可以根据需要添加更多的列和数据。 请注意,上述示例假设您已经在窗体上放置了 TListView(名为 ListView1)、TADOQuery(名为 ADOQuery1)和 TADOConnection(名为 ADOConnection1)组件,并已正确配置 ADOConnection 连接到您的数据库。 希望以上代码对您有所帮助。如果您有任何进一步的问题,请随提问。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 3
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值