Q&A

  • On Error goto문?


비베에서는 On Error goto문이 있습니다만

델파이에서는 어떤식으로 구현하는지 알고 싶습니다.



예를들어 파일을 읽어들일때 파일이 없다거나,

형이 맞지 않아 에라가 발생할때는 에라문을

실행하도록 하고 싶은데요.

1  COMMENTS
  • Profile
    안치봉 1999.06.15 21:07
    디제이 께서 말씀하시기를...

    >

    > 비베에서는 On Error goto문이 있습니다만

    > 델파이에서는 어떤식으로 구현하는지 알고 싶습니다.

    >

    > 예를들어 파일을 읽어들일때 파일이 없다거나,

    > 형이 맞지 않아 에라가 발생할때는 에라문을

    > 실행하도록 하고 싶은데요.



    Each statement in the except part of a try..except block defines code to execute to handle a particular kind of exception. The form of these exception-handling statements is as follows:



    on do ;



    Example



    You can define an exception handler for division by zero to provide a default result:



    function GetAverage(Sum, NumberOfItems: Integer): Integer;

    begin

    try

    Result := Sum div NumberOfItems; { handle the normal case }

    except

    on EDivByZero do Result := 0; { handle the exception only if needed }

    end;

    end;



    Note that this is clearer than having to test for zero every time you call the function. Here's an equivalent function that doesn't take advantage of exceptions:



    function GetAverage(Sum, NumberOfItems: Integer): Integer;

    begin

    if NumberOfItems <> 0 then { always test }

    Result := Sum div NumberOfItems { use normal calculation }

    else Result := 0; { handle exceptional case }

    end;



    The difference between these two functions really defines the difference between programming with exceptions and programming without them. This example is quite simple, but you can imagine a more complex calculation involving hundreds of steps, any one of which could fail if one of dozens of inputs were invalid.

    By using exceptions, you can spell out the "normal" expression of your algorithm, then provide for those exceptional cases when it doesn't apply. Without exceptions, you have to test every single time to make sure you're allowed to proceed with each step in the calculation.





    • 이호선
    • 1999.06.16 07:06
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.16 18:48
      이호선 께서 말씀하시기를... > 안녕하세요 > 한 폼에서 ShowModal로 폼을 띄웠습니다. 이 Modal폼에서 ...
    • 신인재
      1999.06.17 01:08
      테이블이 어떤 테이블인지..... 만약 파일시스템에서 사용하는 파라독스같은 것이면 delzip을 이용하...
    • 초보
      1999.06.17 03:14
      감사합니다. 근데 바쁘신가봐요 자료실에 확인해 봤는데 없더라구요 빨리 올려주세요 그럼.. 신인...
    • 이주흥
    • 1999.06.16 06:04
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.16 18:54
      이주흥 께서 말씀하시기를... > 이거 여기 질문해도 되나 모르겠습니다.. > 다름이 아니고 레지스트리에 ...
    • 홍성원
    • 1999.06.16 05:27
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.16 18:57
      홍성원 께서 말씀하시기를... > 델파이에서의 '폼 디자인'을 그대로 > 모사할 수 있는 방법을 알고 싶습...
    • 최기훈
    • 1999.06.16 03:10
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 조복기
      1999.06.16 03:45
      최기훈 께서 말씀하시기를... > System Menu에서 X로 표시된 버튼을 누르면 User에서 물어본다면 해당 > ...
    • 최선기
    • 1999.06.16 02:08
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 김우철
      1999.06.16 09:35
      고수님의 답변에 덧붙여 몇자 적습니다. 일반적으로 Application을 만들때 젤 먼저 결정해야할 문제중 하...
    • 안치봉
      1999.06.16 03:55
      최선기 께서 말씀하시기를... > Project메뉴/option의 Forms 페이지의 기능에 대해 자세히 알고 싶습니다....
    • 이영범
    • 1999.06.16 01:44
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 신호성
      1999.06.17 17:42
      이영범 께서 말씀하시기를... > 안녕하십니까?... > 퀵리포트에서는 Query컴포넌트(이후 Query)를 1개밖...
    • 서영환
    • 1999.06.16 01:23
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.16 03:31
      서영환 께서 말씀하시기를... > Active Form에서 다운 받은 OCX를 설치하면, > 버전업을 해도 다시 다운...
    • 서영환
      1999.06.16 04:52
      안치봉 께서 말씀하시기를... > 서영환 께서 말씀하시기를... > > Active Form에서 다운 받은 OCX를 설치...
    • 공대규
      1999.06.29 17:18
      > codebase="http://210.116.3.220/t3/tProj1.cab"#version=1,0,0,0 위 부분의 따옴표가 혹시 "htt...
    • 하명훈
    • 1999.06.16 01:16
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 조복기
      1999.06.16 01:27
      하명훈 께서 말씀하시기를... > procedure TSearch.Button1Click(Sender: TObject); > 쿼리를 엑세스하...
    • 박성훈
    • 1999.06.16 01:10
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.16 04:16
      박성훈 께서 말씀하시기를... > procedure Button1Click(Sender: TObject); > begin > Self.Close; ...
    • 강미라
    • 1999.06.16 00:55
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 김우철
      1999.06.16 02:23
      고수는 아니지만, 기냥 써볼랍니다. 날짜에 대한 자료를 처리할수 있는 클래스를 만들어서 윤년계산, 해당...
    • 김진성
    • 1999.06.16 00:42
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 김태균
      1999.06.16 00:49
      김진성 께서 말씀하시기를... > ORACLE에서는 ROWNUM을 이용하여 존재하는 레코드에 대한 > 각각의 번호...
    • 김진성
      1999.06.16 06:22
      김태균 께서 말씀하시기를... > 김진성 께서 말씀하시기를... > > ORACLE에서는 ROWNUM을 이용하여 존재...
    • 김태균
      1999.06.16 18:23
      음..... 테이블을 만들때 포함시키는 것입니다. SQLServer에서 테이블을 생성할 때 순서가 다음과 같...
    • 최기훈
    • 1999.06.16 00:31
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최기훈
      1999.06.16 03:05
      최기훈 께서 말씀하시기를... > 안녕하세요. 염치를 불구하고 이렇게 또 메일을 올립니다. > Delphi에서 ...
    • 장일
    • 1999.06.15 22:58
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 이주흥
    • 1999.06.15 22:55
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최석기
      1999.06.16 01:27
      > TrayIcon에서요.. 팝업메뉴를 만드는 방법좀 알려주세요.. > 그러니까 Icon에서 오른쪽 마우스클릭 했을...
    • 디제이
    • 1999.06.15 20:59
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 안치봉
      1999.06.15 21:07
      디제이 께서 말씀하시기를... > > 비베에서는 On Error goto문이 있습니다만 > 델파이에서는 어떤식으...