델파이xe3 님이 쓰신 글 :
: Delphi XE3 입니다.
: procedure TTr110F.cxButton2Click(Sender: TObject);
: begin
: if FmRuning = nil then
: FmRuning := TFmRuning.Create(Application);
: FmRuning.Show;
: ShowMessage('보이나요'); //==오케이
:
: FmRuning.Close;
: ShowMessage(' JOB No 년,월을 기록 해 주세요'); //==보이지 않음
:
: end;
:
: 일반 폼에서 프로그래스바용 등으로 사용하는 FmRuning 폼입니다,
: 저 폼을 닫으면서 Showmessage보여 주고자 하는데
: 메세지 보여주지 못하네요..
:
: 왜 그럴까요?
FmRuning.Close; 요 때 컨트롤(?)을 잃어 버리는거 같습니다.
FmRuning.Close;
i := 1+ 10; //적용됨
ShowMessage(' JOB No 년,월을 기록 해 주세요'); //==보이지 않음
ShowMessage('보이나요'); //==보임
위처럼 됩니다. 첫번째 showmessage는 보이지 않습니다.
해서 Application.Processmessage;를 첫번째 showmessage 앞에 두고 처리 했습니다.
거참...ㅎ
|