主题:关闭除主窗体之外的所有窗体
xjg9446
[专家分:0] 发布于 2005-02-19 14:58:00
请问:系统自动弹出锁定系统界面后(定时器实现),系统如何自动关闭除主窗体之外的所有其他窗体?
回复列表 (共2个回复)
沙发
zjfywyf [专家分:80] 发布于 2005-02-21 10:08:00
在网站 http://www.ccrun.com/ 上有很多关于这方面的编程文档,你自己可以去看一下啊。
板凳
iamdream [专家分:620] 发布于 2005-02-25 17:01:00
void __fastcall TForm1::Button2Click(TObject *Sender)
{
for(int i=Screen->CustomFormCount-1; i >= 0; i--)
if(Screen->CustomForms[i] != Application->MainForm)
Screen->CustomForms[i]->Close(); //注意,这里其他窗体需自己释放资源
Application->ProcessMessages();
Caption = "窗体数:" + AnsiString(Screen->CustomFormCount);
}
//---------------------------------------------------------------------------
我来回复