Child Form의 OnCloseQuery 이벤트내에서..



procedure TForm3.FormCloseQuery(Sender: TObject; var CanClose: Boolean);

begin

if messagedlg('Close?',mtWarning,[mbOK,mbCancel],0)=mrOK then

canclose:=true

else

canclose:=false

end;



깨굴~



어린왕자A wrote:

> 안녕하세요..영원한 델초보 어린왕자입니다.

>

> MDI폼에서 닫기를 구현할라구 하는데..

>

> 자식폼들이 저장되지 않았으면 자식폼을 저장케 하구 메인폼을 닫게 할려구요..

>

> 근데..문제가 있습니다.

>

> 메인폼 닫기 버튼을 누르니깐..

> 바로 자식폼들이 자동으로 닫히게 되더군요..

> 이때..자식폼닫기전에 바로 작업을 해줘야 할 것이 있는데..

> 어디서 해야 합니까?

>

> 작업이..뭐냐면..

> 초기화입니다..

> 도중에 자식중 하나가 폼닫기를 Cancel했을 때..

> 전체 폼닫기를 중지 시켜야 하지 않겠습니까?

> 그래서 글로벌 변수를 정해줬는데.

> 메인폼 닫기를 시작했을때..초기화를 해주야 하지 않겠습니까..

> 어떻게 해야 될지요..

>

> 질문이 이해가 안가셨다면....다시 메일주셔요(__);;

>

> 무슨 편법이라도 있나요??

네..답변 감사합니다.

저가 원하는 답변은 아니구요(__);;



MDI의 메인폼에서..

WM_CLOSE를 갈고리즘 했죠..



그래서..거기에..



gCanClose := TRUE;

gCloseChilds := TRUE;

Self.Close;







깨구락지 wrote:

> Child Form의 OnCloseQuery 이벤트내에서..

>

> procedure TForm3.FormCloseQuery(Sender: TObject; var CanClose: Boolean);

> begin

> if messagedlg('Close?',mtWarning,[mbOK,mbCancel],0)=mrOK then

> canclose:=true

> else

> canclose:=false

> end;

>

> 깨굴~

>

> 어린왕자A wrote:

> > 안녕하세요..영원한 델초보 어린왕자입니다.

> >

> > MDI폼에서 닫기를 구현할라구 하는데..

> >

> > 자식폼들이 저장되지 않았으면 자식폼을 저장케 하구 메인폼을 닫게 할려구요..

> >

> > 근데..문제가 있습니다.

> >

> > 메인폼 닫기 버튼을 누르니깐..

> > 바로 자식폼들이 자동으로 닫히게 되더군요..

> > 이때..자식폼닫기전에 바로 작업을 해줘야 할 것이 있는데..

> > 어디서 해야 합니까?

> >

> > 작업이..뭐냐면..

> > 초기화입니다..

> > 도중에 자식중 하나가 폼닫기를 Cancel했을 때..

> > 전체 폼닫기를 중지 시켜야 하지 않겠습니까?

> > 그래서 글로벌 변수를 정해줬는데.

> > 메인폼 닫기를 시작했을때..초기화를 해주야 하지 않겠습니까..

> > 어떻게 해야 될지요..

> >

> > 질문이 이해가 안가셨다면....다시 메일주셔요(__);;

> >

> > 무슨 편법이라도 있나요??