急求，如何根据当前窗口句柄判断是否是指定程序

急求，怎么根据当前窗口句柄判断是否是指定程序
没有标题。。。各位大侠帮帮忙啊

[解决办法]

Delphi(Pascal) code

  GetWindowThreadProcessId  GetModuleFileName