摘　要：由窗口句柄获得对应可执行文件名
关键字：句柄
类　别：系统控制


下面这个函数将根据窗口句柄参数返回相应程序的可执行文件名和路径。

正在装载数据……

function GetAppName(hwindow: HWND): string;
var
  h : HMODULE;
begin
  SetLength(Result, 100);
  h:=GetClassLong(hwindow, GCL_HMODULE);
  GetModuleFileName(h, PChar(Result), 100);
end;


用法： ShowMessage(GetAppName(FindWindow('notepad.exe', nil)));