孤独的猫

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

隐藏任务栏

var

    taskbarhandle:HWND;

begin

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

    Showwindow(taskbarhandle,SW_HIDE)

end;

显示任务栏

var

    taskbarhandle:HWND;

begin

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

    Showwindow(taskbarhandle,SW_RESTORE)

end;

posted on 2008-09-13 10:58  孤独的猫  阅读(203)  评论(0编辑  收藏  举报