Delphi ADOQuery1 Update更新数据


本文整理自网络,侵删。

 
  Form1.ADOQuery1.close;
  Form1.ADOQuery1.SQL.Clear;
  Form1.ADOQuery1.SQL.Add('Update 商品基础信息表 Set 商品名称=:A,商品代码=:B,规格=:C,单位=:D,单价=:E,商品说明=:F');
  Form1.ADOQuery1.SQL.Add('Where 商品编号=:G');
  Form1.ADOQuery1.Parameters.ParamByName('A').Value:=Edit1.Text;
  Form1.ADOQuery1.Parameters.ParamByName('B').Value:=Edit2.Text;
  Form1.ADOQuery1.Parameters.ParamByName('C').Value:=Edit3.Text;
  Form1.ADOQuery1.Parameters.ParamByName('D').Value:=Edit4.Text;
  Form1.ADOQuery1.Parameters.ParamByName('E').Value:=StrToInt(Edit5.Text);
  Form1.ADOQuery1.Parameters.ParamByName('F').Value:=Edit6.Text;
  Form1.ADOQuery1.Parameters.ParamByName('G').Value:=Form1.ADOTable1.FieldValues['商品编号'];
  Form1.ADOQuery1.ExecSQL;
  Form1.ADOTable1.Close;
  Form1.ADOTable1.Open;

相关阅读 >>

相对完整的多线程idhttp文件下载代码

Delphi 调用外部程序获取程序id,并能关闭该程序

精通Delphi模拟按键

Delphi字符串深入学习

Delphi打印各类文档

Delphi xe7的android应用设定wifi的有效无效

线程池的概念

Delphi 的webbrowser如何全选并复制浏览器上的文字

Delphi datasnap的线程池

sqlite中的pragma语句攻略

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...