API & Desarrollo 29 de Noviembre del 2006 07:06 pm
Cerrar Sesión de windows desde VFP
API, api de windows, cerrar sesion, Desarrollo, hwnd, kernel32, portalfox, user32 vfp
Bueno, pues volvemos a la carga, esta vez para mostrar un API de windows no documentada 
Declare Long FreeLibrary In "kernel32" Long hLibModule
Declare Long LoadLibrary In "kernel32" String lpLibFileName
Declare Long GetProcAddress In "kernel32" Long hModule, Long lpProcName
Declare Long CallWindowProc In "user32" Long lpPrevWndFunc, Long handle, String Msg , Long wParam, String Lparam
On Error ?''
Local lb As Long
Local pa As Long
lb = LoadLibrary("Shell32")
pa = GetProcAddress(lb, 60)
?CallWindowProc(pa+2, _Screen.HWnd, "Cerrar Sesion", 1, "0")
FreeLibrary(lb)
On Error
Si no quieren pedir la confirmación, en Portalfox.com existe un artículo al respecto, y en uno de los comentarios esta la rutina
Hasta la próxima
API, api de windows, cerrar sesion, Desarrollo, hwnd, kernel32, portalfox, user32 vfp
on 19 Oct 2007 at 15:48 1.oscar
dijo …
Excelente API!!!!
muchas gracias….
que le debo cambiar a esta API para que cierre windows en vez de cerrar sesion.
gcs de neuvo…
on 20 Oct 2007 at 5:35 2.Jorge Mota
dijo …
basta con declarar esta función
Declare SetupPromptReboot IN setupapi.dll long FileQueue, Long Owner, long ScanOnly
SetupPromptReboot(0, _screen.hWnd, 1)
si quieres que pregunte si quiere reiniciar, pasa el ultimo parámetro como un cero en lugar de un uno.