delphi ADOQuery添加用户及密码


本文整理自网络,侵删。

 
procedure TForm1.bt_addClick(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  //ADOQuery1.SQL.Text:='Insert into user(id,password) values(:id,:password)';
  ADOQuery1.SQL.Add('insert into user(id,password'+')values('''+Edit1.Text+''','''+Edit2.Text+''')');
  ADOQuery1.ExecSQL;
  Edit1.Clear;
  Edit2.Clear;
  showMessage('添加成功');
end;
这里使用 TADOQuery 控件作为数据集, 先将控件对象 adoquery1 的数据集关闭ADOQuery1.close;,

然后清空控件对象 adoquery1 里面的 SQL 命令语句ADOQuery1.SQL.Clear;(可能是上次使用的命令语句,也可能没有使用过,所以要先进行清空处理),

接着将本次要执行的 SQL 命令语句添加进去(这里要执行的是增加操作, 所以用SQL里面的INSERT语句)

最后通过调用控件对象adoquery1的ExecSQL方法来完成增加操作。


来源:https://blog.csdn.net/u011846249/article/details/47727939

相关阅读 >>

Delphi getdesktopdir 获取桌面路径

Delphi 计算加班时间工时的函数

Delphi 判断特定字符是为单字节还是双字节

Delphi 移动桌面图标

Delphi10.3构造一个json数据的第三种方法,并格式化输出

Delphi using windows print spooler to run your file

Delphi 根据扩展名的文件搜索

Delphi xe7android应用启用蓝牙

Delphi下获取ie的useragent的方法

Delphi 简单的 "双缓冲" 绘图的例子

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



打赏

取消

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

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

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

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

评论

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