Get process name from active window
I want to make a pop up that displays the process name for the currently active window ("firefox.exe" for example). How do I get this name?
While 1
Sleep(2000)
MsgBox(4096, "Process Name", "Process Name: " & ??????????)
WEnd
Local $Actwin = WinGetHandle("[active]")
Local $PidActwin = WinGetProcess($Actwin)
Local $NamePidActwin = _Findpidname($PidActwin)
MsgBox(0, '', $NamePidActwin)
Func _Findpidname($Pid)
Local $Processlist = ProcessList()
For $i = 1 To $Processlist[0][0]
If $Processlist[$i][1] = $Pid Then Return $Processlist[$i][0]
Next
EndFunc ;==>_Findpidname
