A
Argus
Unregistered / Unconfirmed
GUEST, unregistred user!
var
wnd:thandle;
procedure TForm1.Button1Click(Sender: TObject);
begin
//得到任务栏通知区的窗口句柄;
Wnd:= FindWindow('Shell_TrayWnd', nil);
Wnd:= FindWindowEx(Wnd, HWND(0), 'TrayNotifyWnd', nil);
//隐藏
ShowWindow(Wnd, SW_HIDE);{相应的可以显示SW_SHOW}
end;
……………………………………………………
上面实现隐藏任务栏右边的时钟栏，（全隐）
问：
如何只对某个项目进行隐藏？
比如隐藏音量或输入法，，或QQ什么的
……
急需回答~~~~~~~~~~~（谢谢）
wnd:thandle;
procedure TForm1.Button1Click(Sender: TObject);
begin
//得到任务栏通知区的窗口句柄;
Wnd:= FindWindow('Shell_TrayWnd', nil);
Wnd:= FindWindowEx(Wnd, HWND(0), 'TrayNotifyWnd', nil);
//隐藏
ShowWindow(Wnd, SW_HIDE);{相应的可以显示SW_SHOW}
end;
……………………………………………………
上面实现隐藏任务栏右边的时钟栏，（全隐）
问：
如何只对某个项目进行隐藏？
比如隐藏音量或输入法，，或QQ什么的
……
急需回答~~~~~~~~~~~（谢谢）
]