RT

解决方案 »

  1.   

    please try ...
    with TADOconnection.creat(nil) do
        try
            connection:=conn;//conn是你的连接字符串
            conn.BeginTrans;
            try
            .....
            .....
            conn.CommitTrans;
        finally
            free;
        end;
        except
            on E: Exception do
            begin
                conn.RollbackTrans;
                showmessagebox(e.message)
            end;
        end;
      

  2.   

    某些ado内部的错误,delphi是捕获不了的