用adoquery操作数据库,用的是baiadoconnection,而不是database
只需du要将adoquery的Lock Type设置成 adoquery1.LockType:=ltBatchOptimistic;
procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.UpdateBatch;//提交修zhi改;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
ADOQuery1.Delete;//删除当前行
ADOQuery1.UpdateBatch;//提交修改
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
ADOQuery1.close;
ADOQuery1.open;
end;
procedure TForm1.Button4Click(Sender: TObject);
begin
ADOQuery1.CancelBatch; //取消修dao改;
end;
© 版权声明
文章版权归作者所有,未经允许请勿转载。