数据是删掉了,系统也继续运行,但是会提示一句
---------------------------
Gtysystempub
---------------------------
AdoP: CommandText does not return a result set.
---------------------------
SQL语句是没有问题我的代码是这样的  begin
    if MessageBox(0, pchar(StrMess), '请选择', MB_ICONQUESTION + MB_YESNO) = IDYES then
    begin
      with AdoP do
      begin
        try
          close;
          sql.Clear;
          sql.Text:='delete from dprovince where vcProvinceNo = ' + '''' + nodepoint(tvDic.Selected.Data).StrKey + '''' ;
          execsql;
//执行到这里弹出错误
        //删除此节点
           tvDic.Selected.Delete;
        finally
          close;
        end;
      end;
    end;
  end

解决方案 »

  1.   

    AdoP是什么? ADODataSet1还是ADOQUERY?用ADOQUERY应该不会有问题
      

  2.   

    sql.Clear;
              sql.Text:='delete from dprovince where vcProvinceNo = ' + '''' + nodepoint(tvDic.Selected.Data).StrKey + '''' ;
              execsql;//用 sql.execute
      

  3.   

    AdoP是什么?
    应该用ADOQuery,最好用ADOCommand
      

  4.   

    估计90%的可能性是你的对象类型的问题,改用ADOCommand吧