Q&A
- 모달폼에서 모달폼띄우기
MdiChild폼(A)에서 ShowModal로 폼(B)을 띄우고 입력을 하다가 또다시 B폼에서 ShowModal로 폼(C)를 띄우려고합니다.그런데 C폼에서 종료버튼을 누르면 C폼은 물론이고 B폼까지 사라지고 A폼만 남습니다. --;;;
제가 설정또는 코딩을 잘못한걸까요? 좋은 답변 부탁드립니다.
(formstyle)/(borderstyle)
폼A : mdichild / single
폼B : stayontop / dialog
폼C : single / dialog
//A폼에서 B폼띄우는 문장
procedure TFRM_UBC120I.BitBtn2Click(Sender: TObject);
begin
Application.CreateForm(TFRM_UBC126I, FRM_UBC126I);
FRM_UBC126I.ShowModal;
End;
end;
//B폼에서 C폼띄우는 문장
procedure TFRM_UBC126I.bt_showdtClick(Sender: TObject);
begin
Application.CreateForm(TFRM_UBC125I, FRM_UBC125I);
FRM_UBC125I.Caption := '작업일';
FRM_UBC125I.ShowModal;
end;
//C폼의 종료버튼(B폼도 동일)
procedure TFRM_UBC125I.BT_exitClick(Sender: TObject);
begin
Close;
end;
//C폼의 종료이벤트(B폼도 동일)
procedure TFRM_UBC125I.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
Action := CaFree;
end;
B폼과 C폼의 종료버튼의 kind는 bkCustom, ModalResult는 mrNone로 되어있습니다.
디버그를 걸어보면 C폼에서 종료버튼을 누르면 자기폼을 닫고난후 B폼으로 와서 FormClose이벤트를 타더군요 이걸 안타게하는 방법이나 아니면 위와 같은 방법이 잘못되었다면 좋은방법을 가르쳐주세요 부탁드립니다 꾸벅~~
ps.요즘들어 제가 질문이 점점 많아지는군요^__^;;;
제가 설정또는 코딩을 잘못한걸까요? 좋은 답변 부탁드립니다.
(formstyle)/(borderstyle)
폼A : mdichild / single
폼B : stayontop / dialog
폼C : single / dialog
//A폼에서 B폼띄우는 문장
procedure TFRM_UBC120I.BitBtn2Click(Sender: TObject);
begin
Application.CreateForm(TFRM_UBC126I, FRM_UBC126I);
FRM_UBC126I.ShowModal;
End;
end;
//B폼에서 C폼띄우는 문장
procedure TFRM_UBC126I.bt_showdtClick(Sender: TObject);
begin
Application.CreateForm(TFRM_UBC125I, FRM_UBC125I);
FRM_UBC125I.Caption := '작업일';
FRM_UBC125I.ShowModal;
end;
//C폼의 종료버튼(B폼도 동일)
procedure TFRM_UBC125I.BT_exitClick(Sender: TObject);
begin
Close;
end;
//C폼의 종료이벤트(B폼도 동일)
procedure TFRM_UBC125I.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
Action := CaFree;
end;
B폼과 C폼의 종료버튼의 kind는 bkCustom, ModalResult는 mrNone로 되어있습니다.
디버그를 걸어보면 C폼에서 종료버튼을 누르면 자기폼을 닫고난후 B폼으로 와서 FormClose이벤트를 타더군요 이걸 안타게하는 방법이나 아니면 위와 같은 방법이 잘못되었다면 좋은방법을 가르쳐주세요 부탁드립니다 꾸벅~~
ps.요즘들어 제가 질문이 점점 많아지는군요^__^;;;
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 이수정
- •
- 2000.03.24 01:56
- 1 COMMENTS
- /
- 0 LIKES
-
이정욱•2000.03.24 03:19허허허... 이곳이 수정님 운동장이네여~ 하하.. 여기요. procedure TChatForm.GoLastLine; begin ...
-
- 뭉치
- •
- 2000.03.24 01:39
- 4 COMMENTS
- /
- 0 LIKES
-
최석기•2000.03.24 04:35뭉치 wrote: > 컴퓨터가 다운된 이후에 Table을 열때 Corrupt Table/Index Header 오류가 > 나타납니다. ...
-
뭉치•2000.03.24 11:08한델 자료실에서 건진자료로 성공했습니다. 무지 고맙습니다.
-
이재식•2000.03.24 02:35뭉치 wrote: > 컴퓨터가 다운된 이후에 Table을 열때 Corrupt Table/Index Header 오류가 > 나타납니다. ...
-
뭉치•2000.03.24 10:30이재식 wrote: > 뭉치 wrote: > > 컴퓨터가 다운된 이후에 Table을 열때 Corrupt Table/Index Header 오...
-
- 안영식
- •
- 2000.03.24 01:32
- 2 COMMENTS
- /
- 0 LIKES
-
이재식•2000.03.24 02:31안영식 wrote: > 프린트로 그림을 출력하려고 하는데... 매핑모드로 작업이 들어가면 > 그림이 그려지지 ...
-
안영식•2000.03.24 04:12매핑모드 중 SetMapMode라는 놈이 있는데... 이놈을 이용했거든요. 그러니 앞에서 말씀하신 방법을 이용하...
-
- 강혜승
- •
- 2000.03.24 01:22
- 1 COMMENTS
- /
- 0 LIKES
MdiChild폼(A)에서 ShowModal로 폼(B)을 띄우고 입력을 하다가 또다시 B폼에서 ShowModal로 폼(C)를 띄우려고합니다.그런데 C폼에서 종료버튼을 누르면 C폼은 물론이고 B폼까지 사라지고 A폼만 남습니다. --;;; 제가 설정또는 코딩을 잘못...-
최용일•2000.03.24 06:11그럴수도 있는 결과인것 같은데요... C폼을 종료한것까지는 이상한점이 없겠죠? 근데 이 C폼을 만드는 ...
-
- 혜진이
- •
- 2000.03.24 00:55
- 1 COMMENTS
- /
- 0 LIKES
-
이재식•2000.03.24 02:28혜진이 wrote: > 리치에디터에서 글자를 입력하다가 한화면이 꽉차면 화면이 자동으로 스크롤되어 다음 라...
-
- 최석기
- 2000.03.24 00:43
- 0 COMMENTS
- /
- 0 LIKES
-
- sensemin
- •
- 2000.03.24 00:23
- 1 COMMENTS
- /
- 0 LIKES
-
문영철•2000.03.24 00:49제 메인프로그램 begin - end 입니다. 참조하세요. 무지 쉽습니다. begin FrmSplash := TFrmSplash.C...
-
- 암껏두 몰라용
- •
- 2000.03.23 23:23
- 1 COMMENTS
- /
- 0 LIKES
-
임형호•2000.03.24 02:08암껏두 몰라용 wrote: > 현재 날짜 시간.. 표시하는 거랑요.. > 초에 따라.. 스크롤바가 움직이도록.. 타...
-
- skjang
- •
- 2000.03.23 23:18
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.24 02:28제가 알기론 다른 툴을 사용하시더라도 아이템의 이름으로 소수점이나 특수 문자는 들어갈수 없다고 알고 ...
-
- 박진배
- 2000.03.23 22:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 임진규
- •
- 2000.03.23 22:16
- 1 COMMENTS
- /
- 0 LIKES
-
김영숙•2000.03.24 04:36임진규 wrote: > 안녕하세요. > 제기 as400 에 DB2 로 델파이 프로그램을 하려고 합니다. > 그런데 델파...
-
- 모영찬
- 2000.03.23 22:10
- 0 COMMENTS
- /
- 0 LIKES
-
- 이미나
- •
- 2000.03.23 21:23
- 1 COMMENTS
- /
- 0 LIKES
-
성호종•2000.07.04 02:18이미나 wrote: select to_date + 1 units month from user_info 1년 : + 1 units year; 1일 : + 1 un...
-
- 이수정
- •
- 2000.03.23 21:17
- 3 COMMENTS
- /
- 0 LIKES
-
이정욱•2000.03.23 23:36RichEdit을 사용하세요. 그럼 됩니다. SelAttributes 프로퍼티를 이용하시면 됩니다. 이수정 wrote: ...
-
이수정•2000.03.23 23:42음.. 저는 Win98에 델파이 5를 쓰고 있는데... RichEdit 에서 SelAttributes 가 없는데요?? 어디서 ...
-
최용일•2000.03.24 00:33프라퍼티 에디터에는 안나타나는 속성으로 코드에서 직접작성하셔야 됩니다. 예) procedure TForm1.But...
-
- hee
- •
- 2000.03.23 20:54
- 1 COMMENTS
- /
- 0 LIKES
-
이정욱•2000.03.23 23:38엑셀이 깔려있다면 됩니다. 그런데 아래 문이 좀 이상하네여. sFile_Name := gExcel_Path + ' ' + sFile...
-
- 델초
- •
- 2000.03.23 20:52
- 3 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.23 21:37뭐 방법이야 수없이 많이 있겠지만 간단하게 폼3에 호출하는 폼에 대한 변수를 하나 만들어서 호출할때 여...
-
델초•2000.03.23 22:42말씀하신데로하니까 되는군요... 감사합니다.. 그런데 callform.edit1.text := edit1.text하니까 컴파일시...
-
최용일•2000.03.24 01:02호출하는 폼의 에디트박스 이름이 Edit1입니까? 확인하시고 그 에디트 박스의 그 이름을 넣어주세요... ...
-
- zerozone
- 2000.03.23 20:33
- 0 COMMENTS
- /
- 0 LIKES
-
- 황영철
- •
- 2000.03.23 20:28
- 7 COMMENTS
- /
- 0 LIKES
-
최석기•2000.03.23 20:49
-
황영철•2000.03.23 20:55
-
최용일•2000.03.23 21:07
-
황영철•2000.03.23 21:43
-
최용일•2000.03.23 21:48
-
황영철•2000.03.23 22:47
-
최용일•2000.03.24 00:46
-
- 이수정
- •
- 2000.03.23 20:12
- 5 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.23 21:04
-
이수정•2000.03.23 21:23
-
최용일•2000.03.23 21:43
-
이수정•2000.03.23 23:02
-
최용일•2000.03.24 01:01
-
- blueSky
- •
- 2000.03.23 20:08
- 6 COMMENTS
- /
- 0 LIKES
-
이재식•2000.03.23 21:07
-
blueSky•2000.03.23 21:13
-
안경옥•2000.03.23 23:23
-
이재식•2000.03.23 22:56
-
최용일•2000.03.24 00:44
-
이재식•2000.03.24 02:15
C폼을 종료한것까지는 이상한점이 없겠죠? 근데 이 C폼을 만드는 곳이
바로 버튼인것 같군요. 아마도 맞으리라 생각합니다.
> //B폼에서 C폼띄우는 문장
> procedure TFRM_UBC126I.bt_showdtClick(Sender: TObject);
> begin
> Application.CreateForm(TFRM_UBC125I, FRM_UBC125I);
> FRM_UBC125I.Caption := '작업일';
> FRM_UBC125I.ShowModal; <=======================
> end;
버튼을 클릭하면 그것의 ModalResult값이 버튼의 부모폼의 ModalResult값으로
들어갑니다. 즉 위의 버튼 bt_showdt 맞나요? 이것의 ModalResult값이 0이 아
니면 C폼을 종료하면 B폼도 바로 종료가 되는것입니다.
왜? B폼의 bt_showdt버튼을 눌린 시점에서 버튼 bt_showdt의 ModalResult값이
B폼에 들어가니까.. 이해가 가시나요?
ShowModal로 호출할땐 폼의 ModalResult에 0(mrNone)이 아닌 값이 들어가면
바로 폼은 종료(종료라기 보다는 ShowModal메소드의 실행이 끝나게 되는것임)가
됩니다.버튼 bt_showdt의 ModalResult값을 mrNone으로 하시면 그러한 일이
없을겁니다.
강혜승 wrote:
> MdiChild폼(A)에서 ShowModal로 폼(B)을 띄우고 입력을 하다가 또다시 B폼에서 ShowModal로 폼(C)를 띄우려고합니다.그런데 C폼에서 종료버튼을 누르면 C폼은 물론이고 B폼까지 사라지고 A폼만 남습니다. --;;;
> 제가 설정또는 코딩을 잘못한걸까요? 좋은 답변 부탁드립니다.
>
> (formstyle)/(borderstyle)
> 폼A : mdichild / single
> 폼B : stayontop / dialog
> 폼C : single / dialog
>
> //A폼에서 B폼띄우는 문장
> procedure TFRM_UBC120I.BitBtn2Click(Sender: TObject);
> begin
> Application.CreateForm(TFRM_UBC126I, FRM_UBC126I);
> FRM_UBC126I.ShowModal;
> End;
> end;
>
> //B폼에서 C폼띄우는 문장
> procedure TFRM_UBC126I.bt_showdtClick(Sender: TObject);
> begin
> Application.CreateForm(TFRM_UBC125I, FRM_UBC125I);
> FRM_UBC125I.Caption := '작업일';
> FRM_UBC125I.ShowModal;
> end;
>
> //C폼의 종료버튼(B폼도 동일)
> procedure TFRM_UBC125I.BT_exitClick(Sender: TObject);
> begin
> Close;
> end;
>
> //C폼의 종료이벤트(B폼도 동일)
> procedure TFRM_UBC125I.FormClose(Sender: TObject;
> var Action: TCloseAction);
> begin
> Action := CaFree;
> end;
>
> B폼과 C폼의 종료버튼의 kind는 bkCustom, ModalResult는 mrNone로 되어있습니다.
> 디버그를 걸어보면 C폼에서 종료버튼을 누르면 자기폼을 닫고난후 B폼으로 와서 FormClose이벤트를 타더군요 이걸 안타게하는 방법이나 아니면 위와 같은 방법이 잘못되었다면 좋은방법을 가르쳐주세요 부탁드립니다 꾸벅~~
>
>
>
> ps.요즘들어 제가 질문이 점점 많아지는군요^__^;;;
>
>