通过类名或窗口名判断程序是否已执行
发布日期:2021-06-28 21:21:32 浏览次数:2 分类:技术文章

本文共 415 字,大约阅读时间需要 1 分钟。

通过FindWindow查找指定类名或窗口名的程序句柄,,如果返回值不为0,则程序已经运行。

其中:类名是指主窗体的窗体类名,窗口名是应用程序的标题,如果同时指定类名和窗口名,则必须是类名和窗口名都相同才能获取句柄。

示例:

uses

Winapi.Windows;

//通过窗口标题判断程序是否已经运行

function AppIsRunByWindowName(AWindowName: string): boolean;
begin
  Result := FindWindow(nil,PChar(AWindowName)) <> 0;
end;

//通过主窗体类名判断程序是否已经运行

function AppIsRunByClassName(AClassName: string): boolean;
begin
  Result := FindWindow(PChar(AClassName),nil) <> 0;
end;

转载地址:https://blog.csdn.net/yanjinrong/article/details/107299642 如侵犯您的版权,请留言回复原文章的地址,我们会给您删除此文章,给您带来不便请您谅解!

上一篇:防止程序重复执行:通过类名或窗口名
下一篇:Delphi动态生成控件

发表评论

最新留言

很好
[***.229.124.182]2024年04月24日 16时18分08秒