FJB 表结构
ID(自动编号) TYPE
1 AAA
2 BBB
3 CCC
ZK 表结构
ID(自动编号) TYPEID(就是FJB的ID字段) NAME
1 1 产品1
2 2 产品2
3 3 产品3
...但我下面代码运行时候说什么表达式不匹配,如何写才正确呢?
==================================================
DataModule2.ADOQuery1.Close;
DataModule2.ADOQuery1.SQL.Clear;
DataModule2.ADOQuery1.SQL.add(SELECT * FROM FJB A,ZK B WHERE A.ID=ZK.FJID AND A.ID='+TMPFJBH); //按ID查询
DataModule2.ADOQuery1.open;
DataModule2.ADOQuery1.Edit;
DataModule2.ADOQuery1.FieldByName('TYPE').AsString:=Edit1.text;
DataModule2.ADOQuery1.FieldByName('NAME').AsString:=Edit2.text;
DataModule2.ADOQuery1.Post;
ShowMessage('修改成功!');
================================
ID(自动编号) TYPE
1 AAA
2 BBB
3 CCC
ZK 表结构
ID(自动编号) TYPEID(就是FJB的ID字段) NAME
1 1 产品1
2 2 产品2
3 3 产品3
...但我下面代码运行时候说什么表达式不匹配,如何写才正确呢?
==================================================
DataModule2.ADOQuery1.Close;
DataModule2.ADOQuery1.SQL.Clear;
DataModule2.ADOQuery1.SQL.add(SELECT * FROM FJB A,ZK B WHERE A.ID=ZK.FJID AND A.ID='+TMPFJBH); //按ID查询
DataModule2.ADOQuery1.open;
DataModule2.ADOQuery1.Edit;
DataModule2.ADOQuery1.FieldByName('TYPE').AsString:=Edit1.text;
DataModule2.ADOQuery1.FieldByName('NAME').AsString:=Edit2.text;
DataModule2.ADOQuery1.Post;
ShowMessage('修改成功!');
================================
解决方案 »
- oracle 转换时间日期
- Delphi写的Com在用Regsvr32注册时出现内存错误.会是什么原因呢?
- try--except异常处理问题
- 谁能解释一下HHook是什么?
- Interface 是否需要 Release?
- 运用EhLib中的dbguideh控件遇到的问题?
- MTS和MIDAS各自有什么特点,哪一种更好一点呢
- 请问如何在quickrep报表里,计算打印页的总数,然后填在QRlabel中?
- 如何在delphi中对ACCESS进行备份、恢复、压缩操作呀
- 如何在自己的程序中實現只顯示Word工作區或Excel工作薄而不出現其菜單及工具欄
- 新手求教,有没办法让edit和StringGrid单元格的内容 自动居中
- 关于delphi的停靠控件的一些问题
DataModule2.ADOQuery1.SQL.Clear;
DataModule2.ADOQuery1.SQL.add(SELECT * FROM FJB A,ZK B WHERE A.ID=ZK.FJID AND A.ID='+TMPFJBH); //按ID查询
DataModule2.ADOQuery1.open;
DataModule2.ADOQuery1.Edit;
DataModule2.ADOQuery1.FieldByName('TYPE').AsInteger:=strtoint(trim(Edit1.text));
DataModule2.ADOQuery1.FieldByName('NAME').AsString:=Edit2.text;
DataModule2.ADOQuery1.Post;
ShowMessage('修改成功!');