delphi - 挿入中のクエリからカーソルが返されない

Question

Delphi で TSQLQuery を使用して挿入を実行します。データは完全に挿入されますが、プログラムはタイトル メッセージでエラーを表示します。何か案は ？。これが私のコードです：

With DMConnect.qryCrearProyecto do begin
    ParamByName('cliente').AsString := Self.Edit2.Text;
    ParamByName('obra').AsString := Self.Edit3.Text;
    ParamByName('ubicacion').AsString := Self.Edit4.Text;
    ParamByName('nroEstudio').AsInteger := StrToInt(Self.Edit5.Text);
    ParamByName('sondeo').AsInteger := StrToInt(Self.Edit6.Text);
    ParamByName('nivelFreatico').AsFloat := StrToFloat(Self.Edit7.Text);
    Open;
    Close;
  end;