请教各位老师，我想有个程序启动就隐藏了主窗体。

[zhaoloudy]

就是说点击这个程序就好像什么都没有发生一样。不在任务栏出现就更好了。给点代码。谢谢！

[bzmouse]

Hide();即可

[Micowen989]

真正用到的隐藏代码只有几行。我贴出来为了楼主方便理解而己

[NowCan]

一楼正解，代码其实就一行。

[ljianq]

在项目CPP文件中加入：Application->ShowMainForm=false;
如下：

Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->ShowMainForm=false;
Application->Run();

[佣工7001]

这简单阿，在主窗口的oncreate事件中 ShowWindow(this->Handle,SW_HIDE);

[swites]

try
{
Application->Initialize();
Application->CreateForm(__classid(TMainForm), &MainForm);
SendMessage(Application->Handle,WM_SYSCOMMAND,SC_MINIMIZE,0);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;

[Micowen989]

俺昨天做的自动关机程序
//在任务栏上隐藏程序
DWORD dwExStyle = GetWindowLong(Application->Handle, GWL_EXSTYLE);
dwExStyle |= WS_EX_TOOLWINDOW;
SetWindowLong(Application->Handle, GWL_EXSTYLE, dwExStyle);
try
{

Application->Initialize();
Application->CreateForm(__classid(TMainFrm), &MainFrm);
Application->Title="EdgeSoft Studio 自动关机工具";
Application->ShowMainForm=false;
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
catch (...)
{
try
{
throw Exception("");
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
}
return 0;
}
//隐藏之后如何弹出呢，注册热键。说到这里，不如我将我的程序片段拿出来看看吧。
HPP：
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_HOTKEY,TMessage,OnHotKey)
END_MESSAGE_MAP(TForm)
void __fastcall TMainFrm::OnHotKey(TMessage &Message);
//--------------------------------------------------
CPP：
TForm::Dispatch(&Message);
if (!MainFrm->Visible)
{
MainFrm->Show();
MainFrm->BringToFront();
}
else
MainFrm->Hide();
OnCreate事件：
if (!RegisterHotKey(Handle,2000,MOD_CONTROL,VK_F12)) //Ctrl+F12
MessageBox(Handle,"系统热键注册失败","错误",MB_OK|MB_ICONINFORMATION);
OnClose:
UnregisterHotKey(Handle,2000);

我的废话说完了。^-^

[xizhouhawk]

还要那么多代码吗?

project->option->forms
将AutocreateForms中的所有窗体全部移到右边，也就是Available Forms中去，所有搞定!

[xizhouhawk]

理解错误，改正一下，赞同dajianshi(拔剑四顾心茫然)

[zhaoloudy]

谢谢！非常有用。

[kataboy]

To Micowen989(我知道我说的是废话，咦，我怎么又说废话) :
能不能共享一下你是如何做的。如何处理强制关闭其它的程序和线程。
谢谢！

[Micowen989]

没问题，用下面这段代码，提升权限之后强制关机。什么都搞定了。:)
HANDLE hToken;
TOKEN_PRIVILEGES tkp;
if (OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES|TOKEN_QUERY, &hToken))
{
LookupPrivilegeValue(NULL, SE_SHUTDOWN_NAME, &tkp.Privileges[0].Luid);
tkp.PrivilegeCount = 1;
tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
AdjustTokenPrivileges(hToken, FALSE, &tkp, 0, (PTOKEN_PRIVILEGES)NULL, 0);
ExitWindowsEx(EWX_SHUTDOWN|EWX_POWEROFF, 0);
}