我正在使用Lazarus和MS Access数据库。更新记录不起作用。代码:
Form1.SQLQuery1.Edit;
Form1.SQLQuery1.FieldByName('field1').AsString := Edit1.Text;
Form1.SQLQuery1.FieldByName('field2').AsString := Edit2.Text;
Form1.SQLQuery1.FieldByName('field3').AsString := Edit3.Text;
Form1.SQLQuery1.FieldByName('field4').AsString := Edit4.Text;
Form1.SQLQuery1.Post;
Form1.SQLQuery1.ApplyUpdates;
甚至添加
SQLTransaction1.Commit
不起作用,更改不会保存到数据库,尤其是如果记录是最后一条记录。 这应该如何在拉撒路中完成?
答案 0 :(得分:2)
尝试添加更新记录。像这样:
Form1.SQLQueryMdb.Edit;
Form1.SQLQueryMdb.UpdateRecord;
Form1.SQLQueryMdb.FieldByName('State Name').AsString:= Edit1.Text;
Form1.SQLQueryMdb.Post;
Form1.SQLQueryMdb.ApplyUpdates;
DBGrid1.Refresh;