{ 隐藏任务栏} var hTray:HWND; begin hTray:=FindWindow('Shell_TrayWnd',nil); ShowWindow(hTray,SW_HIDE); end; { 显示任务栏} var hTray:HWND; begin hTray:=FindWindow('Shell_TrayWnd',nil); ShowWindow(hTray,SW_SHOW); end;
本文共 292 字，大约阅读时间需要 1 分钟。
{ 隐藏任务栏} var hTray:HWND; begin hTray:=FindWindow('Shell_TrayWnd',nil); ShowWindow(hTray,SW_HIDE); end; { 显示任务栏} var hTray:HWND; begin hTray:=FindWindow('Shell_TrayWnd',nil); ShowWindow(hTray,SW_SHOW); end;
转载于:https://www.cnblogs.com/tk-del/archive/2012/03/28/2421142.html