Q&A

  • ApplyUpdate가 try.. except문을 안 타는데요
말 그대로 입니다.

이상하게 안 타더군요

도움말을 보아도 이런 내용은 없고 하던데요

그리드 하나에   qry, upsql, Dts 를 각각 연결하고

중복 오류를 냈을시에

except문을 안 타던데 어떤 현상인지 짐작이 안 가는군요

혹시 아시는 고수님덜..

도움좀. 주십시요.

그럼 감사. ^^

밑에 소스는 그냥 테스트로 걸어 본 내용인데

타지를 안습니다.

그럼.

    Query3.FieldByName('TOOL_CD').AsString := '1';
    Query3.FieldByName('TOOL_CLS').AsString := '111111';
    Query3.FieldByName('EXISTS_CLS').AsString := '1';

  try

      Query3.ApplyUpdates;

  except
  on E:EDatabaseError do
    begin
        Query3.Cancel;
        showmessage('주보고류');
    end;
  end;
1  COMMENTS
  • Profile
    정경철 2002.10.12 00:51
    이것은 쿼리 문장하고 무관하게 작동 합니다..
    이 소스대로라면 post가 되지 않았으므로
    ApplyUpdates는 케쉬에 들어있는것만
    계속 실행 합니다. 그러니 에러가 발생 안되죠...
    그리고 ApplyUpdates는 케쉬에 들어 있는
    내용을 실행 하는것이므로 에러가 발생 할 수 없죠.
    이렇게 한번 바꿔 보세요.

      try
       Append;     //Edit;
       Query3.FieldByName('TOOL_CD').AsString := '1';
        Query3.FieldByName('TOOL_CLS').AsString := '111111';
        Query3.FieldByName('EXISTS_CLS').AsString := '1';
        Post;

        Query3.ApplyUpdates;

      except
      on E:EDatabaseError do
        begin
            Query3.Cancel;
            showmessage('주보고류');
        end;
      end;


    좋은 하루 되십시오.