问一个在数据库中插入数据的问题。

Question

Query1.Close;
 Query1.SQL.Clear;
 Query1.SQL.Add('select pid from dicomreport.db');
 Query1.Open;
 Query1.First;
 if Edit1.Text=Query1.FieldByName('pid).AsString then
  ShowMessage('There is a same ID!')
 else  begin
  Query1.Append;
  Query1.FieldByName('pid).AsString:=Edit1.text;
  Query1.Post;
  Query1.Next;
 end;
但每次都有错：can not modify read-only dataset.
我上面的程序这样写行吗？