Q&A

  • [알려주세요!]원초적인 질문인거 같은데.. 잘 모르겠어염..
아래와 같이 이벤트 프로시져에서 Exit를 써서 프로시져만 빠져 나오고 싶은데

폼이 Close가 됩니다. 폼이 Close 안되고, 프로시져만 빠져나가는 방법이 있는지 알고 싶습니다. 그럼 부탁 드립니다.



procedure TMain.BitBtn1Click(Sender: TObject);

begin

if ( 조건 ) then

begin

...

...

Exit

end;

.....

.....



End;

3  COMMENTS
  • Profile
    irookie 2001.10.05 16:43
    exit대신 break를 사용해 보세요.



    제가 알기에는 exit는 폼(프로그램)을 끝내는 걸루 알고 있습니다.



    (아니면 어쩔 수 없지만... --;)



    그럼, 20000



    i believe i can fly~~~



    ----------



    자유지역 wrote:

    > 아래와 같이 이벤트 프로시져에서 Exit를 써서 프로시져만 빠져 나오고 싶은데

    > 폼이 Close가 됩니다. 폼이 Close 안되고, 프로시져만 빠져나가는 방법이 있는지 알고 싶습니다. 그럼 부탁 드립니다.

    >

    > procedure TMain.BitBtn1Click(Sender: TObject);

    > begin

    > if ( 조건 ) then

    > begin

    > ...

    > ...

    > Exit

    > end;

    > .....

    > .....

    >

    > End;

  • Profile
    자유지역 2001.10.05 17:26
    답변 감사합니다.

    하지만 break나 continue 문은 루프에서만 사용이 가능한걸로 알고 있는데..

    그리고 한번 해봤는데 아래와 같은 에러가 발생하는군여..

    Outside Of Loop;



    irookie wrote:

    > exit대신 break를 사용해 보세요.

    >

    > 제가 알기에는 exit는 폼(프로그램)을 끝내는 걸루 알고 있습니다.

    >

    > (아니면 어쩔 수 없지만... --;)

    >

    > 그럼, 20000

    >

    > i believe i can fly~~~

    >

    > ----------





  • Profile
    코스엑스 2001.10.05 18:30
    자유지역 wrote:

    > 답변 감사합니다.

    > 하지만 break나 continue 문은 루프에서만 사용이 가능한걸로 알고 있는데..

    > 그리고 한번 해봤는데 아래와 같은 에러가 발생하는군여..

    > Outside Of Loop;



    exit 쓰시면 됩니다.. 근대 폼이 클로즈되는건 exit 때문이

    아닌것 같군여.. 폼클로즈는 Close; 로 함다.

    BitBtn 쓰시는거 같은데.. ModalResult 를 확인해보시져..



    exit 이있는 프로씨져가 메인 프로씨져라면

    프로그램이 종료될수도 있지만..

    BitBtn 이벤트니.. 아마도 ModalResult 가 mrOK 나 mrClose 가 아닐까 함다.