Q&A

  • 모달폼에서 빠져나올때...
if DM1.MemberList.FieldByName('End_Register').AsString < StrDate then begin

ShowMessage('회원 등록일이 지났습니다.');

if MessageDlg('등록 갱신을 하시겠습니까?',

mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin

frmAgain.ShowModal;

end else Exit;

end;



모달폼에서 Cencel을 하면 다시 이 루프문 밑으로 와서 밑에것이 실행되는데



모달폼에서 Cencel을 하면 이것도 Exit되게 하려면 어떻게 해야되나요...



제가 워낙 초보라서....ㅜㅜ



고수분들 좀 갈켜주세에요......





2  COMMENTS
  • Profile
    kylix 2001.03.10 07:59
    이걸 말씀하시는 거죠?



    if DM1.MemberList.FieldByName('End_Register').AsString < StrDate then

    begin

    ShowMessage('회원 등록일이 지났습니다.');

    if MessageDlg('등록 갱신을 하시겠습니까?',

    mtConfirmation, [mbYes, mbNo], 0) = mrYes then

    begin

    if (frmAgain.ShowModal = mrCancel) then

    Exit; // <<<<<<<

    end

    else

    Exit;

    end;



    델초보...ㅠ.ㅠ wrote:

    > if DM1.MemberList.FieldByName('End_Register').AsString < StrDate then begin

    > ShowMessage('회원 등록일이 지났습니다.');

    > if MessageDlg('등록 갱신을 하시겠습니까?',

    > mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin

    > frmAgain.ShowModal;

    > end else Exit;

    > end;

    >

    > 모달폼에서 Cencel을 하면 다시 이 루프문 밑으로 와서 밑에것이 실행되는데

    >

    > 모달폼에서 Cencel을 하면 이것도 Exit되게 하려면 어떻게 해야되나요...

    >

    > 제가 워낙 초보라서....ㅜㅜ

    >

    > 고수분들 좀 갈켜주세에요......

    >

    >

  • Profile
    델초보...ㅠ.ㅠ 2001.03.10 18:43
    kylix wrote:

    > 이걸 말씀하시는 거죠?

    >

    > if DM1.MemberList.FieldByName('End_Register').AsString < StrDate then

    > begin

    > ShowMessage('회원 등록일이 지났습니다.');

    > if MessageDlg('등록 갱신을 하시겠습니까?',

    > mtConfirmation, [mbYes, mbNo], 0) = mrYes then

    > begin

    > if (frmAgain.ShowModal = mrCancel) then

    > Exit; // <<<<<<<

    > end

    > else

    > Exit;

    > end;

    >

    > 델초보...ㅠ.ㅠ wrote:

    > > if DM1.MemberList.FieldByName('End_Register').AsString < StrDate then begin

    > > ShowMessage('회원 등록일이 지났습니다.');

    > > if MessageDlg('등록 갱신을 하시겠습니까?',

    > > mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin

    > > frmAgain.ShowModal;

    > > end else Exit;

    > > end;

    > >

    > > 모달폼에서 Cencel을 하면 다시 이 루프문 밑으로 와서 밑에것이 실행되는데

    > >

    > > 모달폼에서 Cencel을 하면 이것도 Exit되게 하려면 어떻게 해야되나요...

    > >

    > > 제가 워낙 초보라서....ㅜㅜ

    > >

    > > 고수분들 좀 갈켜주세에요......

    > >

    > >