關於保存

Question

在我保存的代碼中。有一段：
    DataModule1.ADOQuery3.First;
     while not DataModule1.ADOQuery3.Eof do
      begin
       DataModule1.ADOQuery3.FieldByName('userid').AsString:=DataModule1.ADOQuery1.FieldByName('userid').AsString;
       DataModule1.ADOQuery3.Next;
      end;
循環寫入關鍵字段的代碼。
但它顯示：adoquery3　not edit or insert mode.
請問我要如何做？
保存是否有更好的方法？

Answer 1

// 这样的复制为什么不用sql语句？
DataModule1.ADOQuery3.sql.text := 'select ... into ...';
// 你的问题是没有qry3没有在编辑模式.
   DataModule1.ADOQuery3.edit; // 置为编辑模式
   DataModule1.ADOQuery3.post; // 提交.这样才会保存

Answer 2

DataModule1.ADOQuery3.edit;
......
......
DataModule1.ADOQuery3.post;

Answer 3

楼上的都说过。但感觉用Query来保存还是反正我是不太喜欢。

Answer 4

我在這之前也加了DataModule1.ADOQuery3.edit;這一句，但還是不行啊救命。

Answer 5

用ADODataSet是不是你用了联连查询，这时有可能不能更新