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되게 하려면 어떻게 해야되나요...
제가 워낙 초보라서....ㅜㅜ
고수분들 좀 갈켜주세에요......
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되게 하려면 어떻게 해야되나요...
>
> 제가 워낙 초보라서....ㅜㅜ
>
> 고수분들 좀 갈켜주세에요......
>
>