delphi中如何隐藏，系统中安装的一些程序在系统启动时，自动放置在系统托盘位置的图标？

Question

delphi中如何隐藏，系统中安装的一些程序在系统启动时，自动放置在系统托盘位置的图标？
比如：我想通过写程序来隐藏系统托盘位置中金山毒霸的图标，请问有办法实现吗？

Answer 1

隐藏系统托盘    
  procedure hideStartbutton(visi:boolean); 
{visi 为 True 则显示，False则隐藏}VarTray, Child : hWnd;C : Array[0..127] of Char;S : String;BeginTray := FindWindow('Shell_TrayWnd', NIL);Child := GetWindow(Tray, GW_CHILD);While Child <> 0 doBeginIf GetClassName(Child, C, SizeOf(C)) > 0 ThenBeginS := StrPAS(C);If UpperCase(S) = 'TRAYNOTIFYWND' thenbeginIf Visi then ShowWindow(Child, 1)else ShowWindow(Child, 0);end;End;Child := GetWindow(Child, GW_HWNDNEXT);End;End;　 
 

Answer 2

隐藏： 
  在工程文件(.dpr)中
       Application.CreateForm(TFormMain, FormMain);
       Application.ShowMainForm:=false;工厂 //加入这句
       Application.Run;托盘图标楼上就差不多了。你可以搜索一下，CSDN多的是、

Answer 3

我觉得是不是可以分两步走：
  1、获取想要隐藏的图标（handle或者其他什么东东，只要能够唯一确定该图标即可）
  2、隐藏该图标
请各位多多帮忙！本人在线等待

Answer 4

Agree with  Means_pan(酷鱼-真的是"难得胡涂")