Visual Basic - Hacer programa residente en memoria

Life is soft - evento anual de software empresarial
 
Vista:

Hacer programa residente en memoria

Publicado por Manuel Pastrana Orozco (44 intervenciones) el 25/01/2005 23:26:58
Saludos a tod@s

Espero que puedan ayudarme.
Necesito hacer un programa que se quede residente en memoria, oculto a la vista del usuario hasta que se produzca un determinado evento y muestre un aviso en el monitor.

Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Hacer programa residente en memoria

Publicado por Benjo (679 intervenciones) el 26/01/2005 15:58:04
En windows ME y 9x funciona así

en un Modulo Bas
Public Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Public Declare Function GetCurrentProcess Lib "kernel32" () As Long
Public Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long
Public Const RSP_SIMPLE_SERVICE = 1
Public Const RSP_UNREGISTER_SERVICE = 0

'En un form
Public Sub RemoveProgramFromList()
Dim lngProcessID As Long
Dim lngReturn As Long
lngProcessID = GetCurrentProcessId()
lngReturn = RegisterServiceProcess(lngProcessID, RSP_SIMPLE_SERVICE)
End Sub

'To restore your application to the Ctrl+Alt+Delete list, call the UnMakeMeService procedure:
Public Sub AddProgramToList()
Dim lngProcessID As Long
Dim lngReturn As Long
lngProcessID = GetCurrentProcessId()
lngReturn = RegisterServiceProcess(lngProcessID, RSP_UNREGISTER_SERVICE)
End Sub
En XP no hay forma aún, salvo, creando hilos me han dicho, pero no lo he visto funcionando.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Gracias, tengo XP

Publicado por Manuel Pastrana Orozco (44 intervenciones) el 26/01/2005 16:29:27
Gracias, conservaré el código.

Otra pregunta: ¿Cómo es eso de las "líneas"? Todos los equipos en los que operamos tienen WXP.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar