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;

Answer 1

我不知道 TSQLQuery 有多严格，但通常你不应该对 SQL 语句使用 Open 方法，它不返回数据（这是那个游标）。您应该改为调用 ExecSql。