在Lazarus中更新MS Access数据库记录

时间:2012-10-23 12:59:13

标签: ms-access freepascal lazarus

我正在使用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

不起作用,更改不会保存到数据库,尤其是如果记录是最后一条记录。 这应该如何在拉撒路中完成?

1 个答案:

答案 0 :(得分:2)

尝试添加更新记录。像这样:

Form1.SQLQueryMdb.Edit;
Form1.SQLQueryMdb.UpdateRecord;
Form1.SQLQueryMdb.FieldByName('State Name').AsString:= Edit1.Text;
Form1.SQLQueryMdb.Post;
Form1.SQLQueryMdb.ApplyUpdates;
DBGrid1.Refresh;