FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Monitorear aplicacion desde delphi
Hola a todos.
Alguien me puede ayudar por favor para poder consultar desde delphi si una maquina que esta en mi red tiene o no ejecutando una aplicacion en particular, necesito obtener todas las maquinas que tienen ejecutando dicha aplicacion. Desde ya muchas gracias |
#2
|
|||
|
|||
Hola
Podés probar con esto: procedure TForm1.Button1Click(Sender: TObject); function EstaEjecutandose (ExeFile:string): boolean; var H:word; begin H := CreateFile(PChar(ExeFile), GENERIC_READ, 0, nil, OPEN_EXISTING, 0, 0); Result := (H >= 65535); CloseHandle(H); end; begin if EstaEjecutandose ('c:\windows\notepad.exe') then Label1.Caption:='SI/YES' else Label1.Caption:='NO'; end; Espero sirva Saludos Augusto |
#3
|
|||
|
|||
Hola ajvdelphi
Bienvenido a los foros de Club Delphi, te recomiendo que le des una leida a la Guía de Estilo. Otra cosa, cuando publiques código fuente en Delphi, usa las etiquetas [delphi]: [delphi] begin ProcedimientoAEjecutar; Variable := 'hola mundo'; // ejemplo end; [/delphi] lo que se mostrará en los foros así:
Saludos... |
#4
|
|||
|
|||
Hola maeyanes
Ok, entendido, ya me mandé dos, pero aprendí Saludos Augusto |
#5
|
||||
|
||||
A ver si recordamos poner los tags al código fuente, ejemplo:
Gracias |
#6
|
|||
|
|||
Hola ajvDelphi
Antes que todo gracias por respuesta Una consulta en que parte le indico la direccion IP de la maquina que quiero monitorear si tiene ejecutando mi sistema? Porque el codigo que me pasaste ya lo encontre y funciona pero solo en la maquina localmente, lo que necesito es monitorear una maquina en particular conociendo su nombre o su direccion IP. Gracias nuevamente |
#7
|
|||
|
|||
Hola.
Me habían pasado hace tiempo este código, que no probé, y se supone que puede detectar cualquier aplicacion inclusive si se está ejecutando en otra máquina, habrá que probar Hay que agregar 'TLHelp32' en el uses de tu form
Espero te sirva, sino a seguir buscando!!!! Saludos Augusto |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Monitorear S.O. | orlando9427 | API de Windows | 2 | 16-11-2010 21:54:38 |
Monitorear tablas | lucasarts_18 | MS SQL Server | 3 | 13-11-2008 01:35:11 |
Monitorear el registro | Suriu | Windows | 2 | 18-04-2007 20:26:34 |
Monitorear Firebird 1.5 | jc.guzman | Firebird e Interbase | 2 | 21-10-2005 03:23:33 |
Monitorear procesos | victork_py | Firebird e Interbase | 7 | 27-08-2003 12:06:29 |
|