Hola
Amigo funciona bien en XP.
Lo único es que haciendo algunas pruebas me da la impresion de que se presenta mas rápido así:
Código Delphi
[-]ShowWindow(FindWindow(TASKBTITLE, nil), SW_SHOW); ShowWindow(FindWindowEx(0, 0, MAKEINTATOM($C017), nil), SW_SHOWNA)
Por cierto (para madiazg), crea un boton (close) en el codigo de mi amigo ecfisa, si no tendras que usar el taskmanager para cerrar el programa.
Muy buen código amigo: Listo y archivado.
Saludos