單實例運行-1 (使用FindWindow函數)

最新推荐文章于 2021-05-20 06:37:17 发布

编译失败

最新推荐文章于 2021-05-20 06:37:17 发布

阅读量1.5k

点赞数

分类专栏： C++/BCB开发文章标签： exception winapi

本文链接：https://blog.csdn.net/aniven/article/details/556239

版权

C++/BCB开发专栏收录该内容

70 篇文章 0 订阅

订阅专栏

以下Project.cpp文件,可以實現已運行的程式在最小化後,再運行第二遍時還原第一個程式.

#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
HWND AppWnd=FindWindow("TApplication","Shally Title");
if(AppWnd)
{
    if(IsIconic(AppWnd))
    {
      ShowWindow(AppWnd,SW_RESTORE);
    }
    else
    {
      SetForegroundWindow(AppWnd);
    }
    return 0;
}

        try
        {
                 Application->Initialize();
                 Application->Title="Shally Title";
                 Application->CreateForm(__classid(TForm1), &Form1);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        catch (...)
        {
                 try
                 {
                         throw Exception("");
                 }
                 catch (Exception &exception)
                 {
                         Application->ShowException(&exception);
                 }
        }
        return 0;
}