Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[9815] [질문]MDI에서 Full Screen
김영민 [metalzone] 984 읽음    2004-08-19 14:04
MDI에서 Full Screen을 구현하려고 합니다.
Full Screen 모드 전환 프로시저는 다음과 같습니다.

procedure TMainForm.FullScreenClick(Sender: TObject);
begin

if BorderStyle=bsNone then
begin
   BorderStyle:=bsSizeable;
   WindowState:=wsNormal;
   ToolBar2.Visible:=true;
   bFullScreen:=false;

   setwindowpos(Self.Handle,hwnd_topmost,p.X,p.Y,w,h,swp_nozorder or swp_showwindow);
end
else
begin
   w:=Width;
   h:=Height;
   p.X:=Left;
   p.Y:=Top;

   ToolBar2.Visible:=false;
   BorderStyle:=bsNone;
   WindowState:=wsMaximized;
   bFullScreen:=true;
end;
end;

이렇게 구현 하면 정확한 풀스크린 모드인지는 모르겠지만 하여튼 비슷하게 구현이
되는거 같습니다.
문제는 Child 창을 생성 한 후 풀스크린 모드를 하면 Child 창이 보이지 않는다는 겁니다.
MDIChildCount를 보면 Child 창이 Close 되어 있는거 아닌거 같습니다.
위와 같이 화면 전환 시 Child 창이 화면에 보이게 하려면 어떻해야 하는지
통 알 수가 없군요. 이거 어떻게 해결해야 할까요...
소스 첨부 하구요, MDI에서 풀스크린 모드를 구현하는 더 좋은 방법이 있을꺼 같기도 한데요... 정말 답답합니다.

좋은 답변 부탁드립니다.
그럼 좋은 하루 되세요.

+ -

관련 글 리스트
9815 [질문]MDI에서 Full Screen 김영민 984 2004/08/19
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.