아래와 같이 하면 됩니다.



VAR

hTaskBar : integer;

BEGIN

hTaskBar := FindWindow('Shell_TrayWnd', nil);

ShowWindow(hTaskBar, SW_HIDE); // 작업 표시줄을 감춘다.

ShowWindow(hTaskBar, SW_SHOW); // 작업 표시줄을 보인다.





주경래 wrote:

> 현재 메인폼을 fsStayOnTop으로 설정하여 작업표시줄을 현재의 윈도우

> 밑으로 오게하였습니다.

> 그런데 메인폼에서 다른폼을 생성하고(이것도 fsStayOnTop입니다) 마우스를 아래로

> 당기면 작업표시줄이 나타납니다.

> 이것 안나타나게 하는 방법없습니까?

>

> 안나타나게 하는 목적은 현재프로그램이외에 다른프로그램을 실행하지 못하게

> 하려고 합니다.

> 일단 시작버튼을 없에고 윈도우의 크기를 최대로하고 타이틀바를 없에서

> 윈도우를 이동 못하게하였으며, Ctrl-Alt-Del 키와 Alt-Tab, Alt-F4를

> 사용 못하게 하는 것까지는 했는데 작업표시줄은 도저히 제어하는 방법을

> 찾을 수가 없더군요.

>

> 아시는 분 빨리 답변해 주시면 고맙겠습니다.

> 감사합니다.