把Record中数据赋值给ADoquery的时候出错
- Delphi(Pascal) code
qry1.Open; qry1.Edit; qry1.FieldByName('date').AsString := instRecord.date; qry1.FieldByName('name').AsString := instRecord.name; qry1.FieldByName('time').AsString := instRecord.time; qry1.FieldByName('pass').AsString := instRecord.pass; qry1.FieldByName('prbl').AsString := instRecord.prbl; qry1.Open;
instRecord结构中的值都已经有了,qry1中的Fieldkind都是fkLookup
报的错是Qur1:Field'date'not found
为了让Qry1打开,随便连了个SQL数据库,做了一次空查询,我只想把instRecord赋值给qry1
[解决办法]
qry1查询返回结果集中不存在date列,注意字段的命名规则,
[解决办法]
date 是 SQL 关键字,qry1.FieldByName('[date]').AsString := instRecord.date;