Hi Experts!
Here code hide the clock in the system tray
--------------------
function ShowTrayClock(bValue: Boolean) : Boolean;
var
TrayWnd, TrayNWnd, ClockWnd: HWND;
begin
TrayWnd := FindWindow('Shell_TrayWnd', nil);
TrayNWnd := FindWindowEx(TrayWnd, 0, 'TrayNotifyWnd', nil);
ClockWnd := FindWindowEx(TrayNWnd, 0, 'TrayClockWClass', nil);
Result := IsWindow(ClockWnd);
if Result then
begin
ShowWindow(ClockWnd, Ord(bValue));
PostMessage(ClockWnd, WM_PAINT, 0, 0);
end;
end;
-------------------------
i need hide icons of another application, for example: Internet Download Manager,...
Thanks!
http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_21976678.html
this will let you enumerate all the tray icons, and interact with them as well. In this case, you would just set the .Visible property for each to false. Let me know if you need assistance using the code.
Russell