Description: R3 layer testing of Delphi code HideToolz principle is very simple to check whether the system tray area contains " HideToolz" string. HideToolz If the Explorer.exe with hidden, then the code could not be detected above the. Here the code to copy the contents to the clipboard : ToolBarHnd: = FindWindowEx (0, 0, ' Shell_TrayWnd' , nil) ToolBarHnd: = FindWindowEx (ToolBarHnd, 0, ' TrayNotifyWnd' , nil) ToolBarHnd: = FindWindowEx (ToolBarHnd, 0, ' SysPager' , nil) ToolBarHnd : = FindWindowEx (ToolBarHnd, 0, ' ToolbarWindow32' , nil) if ToolBarHnd = 0 then begin Exit end will be out of function, of course, before you can jump out to deal with code, to prevent hidden Explorer.exe. complete code and test included in the Annex, the operation project1.exe, open HideToolz will MessageBox if there is no prompt or a quiet exit.
File list (Check if you may need any files):
Project1.dpr
Project1.exe
Download