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