请问如何让一个delphi程序在开机的时候自动驻留到后台。并且不再任务栏出现

Question

请问如何让一个delphi程序在开机的时候自动驻留到后台。并且不再任务栏出现等待激活就是说它只能在任务列表里面出现而不再状态栏出现。另外就是怎么让一个程序只运行一次最小化的时候如果运行该程序则激活当前程序

Answer 1

不出现：
在工程文件里加上这一句：Application.ShowMainForm := False;

Answer 2

问题2：在工程度文件中加入这个函数：procedure Runnig_CreateMutex(AppTitle: string);
var
 hWnd: THandle;
begin
hWnd := FindWindow(nil,PChar(AppTitle)); {搜索窗口}
    if hWnd <> 0 then   {如果找到指定窗口}
    begin
     if IsIconic(hWnd) then {如果已被最小化}
         ShowWindow(hWnd, SW_RESTORE)
        else                    {如果窗口被其它窗口遮住，则将它提前景来}
         SetForegroundWindow(hWnd);
        Halt;
    end;
end;

Answer 3

不出现：
在工程文件里加上这一句：Application.ShowMainForm := False;
这句加在哪里？我是说开机的时候就让程序自动运行且不出现

Answer 4

我加载工程里面没有反应阿
begin
  Application.Initialize;
  Application.CreateForm(TLogin, Login);
  Application.CreateForm(TMain, Main);
  Application.Run;
  Application.login := False;end.是不是加在这里

Answer 5

Application.ShowMainForm := False;

Answer 6

加到运行的前面：
Application.ShowMainForm := False;
Application.Run;

Answer 7

http://community.csdn.net/Expert/topic/4702/4702854.xml?temp=.6993524这里还有一个问题

Answer 8

不是这个意思哦，开个玩笑罢了！相互学习，我也许多地方要请教的！！  if CanClose then
  begin
    CanClose:=false;
    Postmessage(Handle,WM_SYSCOMMAND,SC_MINIMIZE,0);
 end else
    CanClose:=true;把这代码放在主窗口的OnCloseQuery事件中，我测试了，是可以的。
这是最小到会“任务栏”。至于你要最小化到托盘。。那又是新的问题了哦哈哈。
提示：
你下个TrayIcon控件。。