procedure TaskBar(Handle : hwnd ; sw : Boolean);
var
wndHandle: THandle;
wndClass: array[0..50] of Char;
begin
StrPCopy(@wndClass[0], 'Shell_TrayWnd');
// taskbar 핸들 얻기
wndHandle := FindWindow(@wndClass[0], nil);
if sw then
ShowWindow(wndHandle, SW_RESTORE) // restore the taskbar
else
ShowWindow(wndHandle, SW_HIDE); // hides the taskbar
end;
위 프로시져로 Taskbar가 없어지고, 보이는것은 잘됩니다
그런데 Taskbar가 없어진 자리가 휭하니 남네요??????
폼은 실행시 최대화로 지정하였습니다.
Taskbar속성이 "작업표시줄을 항상 위로 유지" 로 되서있으면 TaskBar자리가 빈공백으로 남는군요
갑자기 필요해서 쓰려고 몇시간째 이리저리 뒤지고 있습니다.