Obtener el nombre del exe de un identificador de ventana
Cómo obtener el ejecutable de nombre de archivo cuando se le da un identificador de ventana.
utiliza ..., enumStuff
la función de WindowToExe(ventana: dword) : string
var pid : dword
pl : TProcessList
i1 : integer
begin
resultado := '
pl := nil
GetWindowThreadProcessID(ventana, @pid)
si pid <> 0 then begin
pl := GetProcessList
i1 := 0 a alta(pl)
si pl[i1].pid = pid, a continuación, empezar
resultado := pl[i1].nombre de
break
fin
fin
fin
& & & & &
notas:
(1) Mi unidad 'enumStuff' es gratis, incluso para uso comercial.
(2) Esta solución funciona en todas las actuales (win95, win95osr2, win98, win98se, winME, winNT4, win2k y winXP) y probablemente también en todas futuro (cercano) de Microsoft OSs.
Obtener el nombre del exe de un identificador de ventana
Obtener el nombre del exe de un identificador de ventana : Multi-millones de consejos para hacer su vida mas facil.
Como obtener el ejecutable de nombre de archivo cuando se le da un identificador de ventana.
utiliza ..., enumStuff
la funcion de WindowToExe(ventana: dword) : string
var pid : dword
pl : TProcessList
i1 : integer
begin
resultado := '
pl := nil
GetWindowThreadProcessID(ventana, @pid)
si pid <> 0 then begin
pl := GetProcessList
i1 := 0 a alta(pl)
si pl[i1].pid = pid, a continuacion, empezar
resultado := pl[i1].nombre de
break
fin
fin
fin
& & & & &
notas:
(1) Mi unidad 'enumStuff' es gratis, incluso para uso comercial.
(2) Esta solucion funciona en todas las actuales (win95, win95osr2, win98, win98se, winME, winNT4, win2k y winXP) y probablemente tambien en todas futuro (cercano) de Microsoft OSs.
Obtener el nombre del exe de un identificador de ventana
By Consejos Y Trucos
Obtener el nombre del exe de un identificador de ventana : Multi-millones de consejos para hacer su vida más fácil.