选择一个BUTTON控件然后又击进入到代码编写界面，写如下代码：
procedure TFrom.btButtonClick(Sender: TObject);
var SqlText: String;
begin
SqlText := ' UPDATE .......'; //在此处写你要update的代码
ExecuteSQL(SqlText );//ExecuteSQL这个语句要引用DBFUNC单元才行。(在uses里面加DBFUNC单元才行。)
end;
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024