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
[13160] 작업표시줄 없애기..[SW_HIDE 말고 다른 방법은?]
Hyphen [] 3057 읽음    2010-03-30 09:04
안녕하세요?
취미로 델파이를 연마하는 Hyphen입니다.

폼을 최하위로 위치하기 위하여 다음과 같이 코딩하였습니다.
procedure TMain_Form.FormShow(Sender: TObject);
var
  DC : THandle;
begin
//  showWindow(Application.Handle, SW_HIDE);

  DC := GetWindow(GetWindow(FindWindow('Progman', nil), GW_CHILD), GW_CHILD);
  Windows.SetParent(Handle, DC);
end;

그리고나서 버튼을 클릭하여 폼이 재실행 됩니다.
procedure TMain_Form.sbtnReExecClick(Sender: TObject);
begin
  Application.Terminate;
  ShellExecute(Handle, 'Open', PChar(ParamStr(0)), nil, nil, SW_SHOW);
end;

위의 코드에서 showWindow(Application.Handle, SW_HIDE)를 삭제하니까 원하는 대로 재실행시에도 최하위로 폼이 가는데
문제는 작업표시줄에 나타납니다.

showWindow는 원하는 바때문에 쓸 수가 없습니다.
다른 방법이 있을까요? 어떤 분은 작업표시줄 길이를 0으로 하면 된다고도 하던데.. 어떻게 하는 걸까요?

SetWindowLong은 해 봤는데 안되더라구요.. 사용방법이 틀렸을까요? 자문 부탁드립니다.

+ -

관련 글 리스트
13160 작업표시줄 없애기..[SW_HIDE 말고 다른 방법은?] Hyphen 3057 2010/03/30
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.