delphi ADOQuery查询更改用户


本文整理自网络,侵删。

 

procedure TForm1.bt_deleteClick(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('delete from user where id='''+Edit1.Text+''' and password='''+Edit2.Text+'''');
  ADOQuery1.ExecSQL;
  Edit1.Clear;
  Edit2.Clear;
  showMessage('删除成功');
end;
 
 
procedure TForm1.bt_changeClick(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('update user set password='''+Edit2.Text+''' where id='''+Edit1.Text+'''');
  ADOQuery1.ExecSQL;
  Edit1.Clear;
  Edit2.Clear;
  showMessage('更改成功');
end;
都是一个套路,理解了就会写了?
――――――――――――――――

原文链接:https://blog.csdn.net/kisssfish/article/details/88746065

相关阅读 >>

Delphi求解一元二次方程

Delphi webbrowser设置自己定义user-agent

Delphi adoconnection1连接mssql数据库方法

Delphi 安卓读写ini文件

Delphi 调用golang dll

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

ttreeview的两个事件ondragdrop、ondragover 实现自动拖放功能

Delphi net.httpclient用最精简的代码获取网页数据

Delphi 递归遍历 treeview树节点

Delphi xe 关闭android应用

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



打赏

取消

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

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

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

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

评论

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