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 startcount() 时间计数器

Delphi 让窗体自适应屏幕显示

Delphi将image存入mysql数据库

Delphi2010 编译变量$region用法

Delphi 收藏字符串处理单元

Delphi idhttp post json

Delphi 枚举数组

Delphi post数据到网页

Delphi not 与整数

Delphi utf8处理单元

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

转载请注明出处：木庄网络博客 » delphi ADOQuery查询更改用户