回 帖 发 新 帖 刷新版面

主题:关闭除主窗体之外的所有窗体

请问:系统自动弹出锁定系统界面后(定时器实现),系统如何自动关闭除主窗体之外的所有其他窗体?

回复列表 (共2个回复)

沙发

在网站 http://www.ccrun.com/ 上有很多关于这方面的编程文档,你自己可以去看一下啊。

板凳

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);
}
//---------------------------------------------------------------------------

我来回复

您尚未登录,请登录后再回复。点此登录或注册