修改的问题

Question

我在做修改时；通过查看功能把数据都显示在 edit里面
但是我想修改其中一个数据，我是这样做的：
procedure TForm5.SpeedButton3Click(Sender: TObject);
begin
with query1 do
begin
  query1.Edit;
query1.FieldByName('楼宇编号').AsString:=trim(edit1.Text);
query1.FieldByName('房屋编号').AsString:=trim(edit2.Text);
query1.FieldByName('楼宇名称').AsString:=trim(edit3.Text);
query1.FieldByName('房屋类型').AsString:=trim(edit4.Text);
query1.FieldByName('建筑面积').AsString:=trim(edit5.Text);
query1.FieldByName('使用面积').AsString:=trim(edit6.Text);
query1.FieldByName('备注').AsString:=trim(memo1.Text);
 query1.Post;
 query1.Refresh;
end;
   end;
可是结果是出错：query1:cannot modify a read-only dataset
请问怎么改啊

Answer 1

把你的数据集的控件属性重中Readonly属性改为false

Answer 2

把你的数据集的控件属性重中Readonly属性改为True;