볼랜드포럼: 폼을 최상위 윈도로 만들기

	C++Builder \| Delphi \| FireMonkey \| C/C++ \| Free Pascal \| Firebird

델파이 포럼

Q & A

볼랜드포럼 홈

헤드라인 뉴스

회원 메뉴

북마크

델파이 팁&트릭		Delphi Programming Tip&Tricks

[187] 폼을 최상위 윈도로 만들기
civilian,안영제 [civilian]	8513 읽음 2005-12-01 19:23

TForm의 속성에 AlwaysOnTop이 있지만, 이것은 어플리케이션 내에서만 유효합니다.
모든 윈도에서 가장 상위창으로 만드려면 다음 코드를 사용하세요.

// 최상위 윈도로

SetWindowLong(Form.Handle, GWL_HWNDPARENT, TForm(Owner).Handle);
SetWindowPos(Form.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);

// 해제

SetWindowLong(Form.Handle, GWL_HWNDPARENT, TForm(Owner).Handle);
SetWindowPos(Form.Handle, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);