Hola Antonio:
Cuando se genera un error.log, ahora las tareas en ejecución son muy poquitas y no incluyen todas como antaño.
Esto es importante, para saber el antivirus que usa el usuario, spyware posible, etc.
Muchas gracias.
#include "FiveWin.ch"
#define GHW_HWNDFIRST 0
#define GHW_HWNDNEXT 2
#define GWW_HINSTANCE -6
//----------------------------------------------------------------------------//
function GetTasks()
local hWnd := GetWindow( GetActiveWindow(), GHW_HWNDFIRST )
local aTasks := {}
local cTask
while hWnd != 0
#ifdef __CLIPPER__
cTask = GetModuleFileName( GetWindowWord( hWnd, GWW_HINSTANCE ) )
#else
// cTask = GetModuleFileName( GetWindowLong( hWnd, GWW_HINSTANCE ) )
cTask = GetWindowText( hWnd ) // The above does now work :-(
#endif
if AScan( aTasks, cTask ) == 0
AAdd( aTasks, cTask )
endif
hWnd = GetWindow( hWnd, GHW_HWNDNEXT )
end
return aTasksAntonio,
Sí, funciona perfecto.
¿Por qué se hizo este cambio?. ¿No podría volverse a poner como antes?. De esta forma salen todas las tareas activas, y es muy importante saber cuando se genera un error.log qué procesos y aplicaciones tiene el usuario cargados.
Muchas gracias.
El sistema que usábamos antes no es el que recomienda Microsoft, pero por lo que se ve, es mejor.
Lo extraño es que ningún otro usuario de FWH haya comentado nada al respecto. O tal vez yo no lo he visto.