PDA

Ver la Versión Completa : Detectar proceso externo


MacStreet
15-11-2017, 04:09:16
Hola Con todos..
Este codigo detecta procesos internos como notepad, yo quisiera que detecte procesos externos ejemp : "usuarios.exe"
procedure TForm2.Button1Click(Sender: TObject);
var
hNotepadWindow: HWND;
begin
hNotepadWindow := FindWindow('notepad', nil);
SetWindowPos(hNotepadWindow,
HWND_TOPMOST,
0, 0, 0, 0,
SWP_NOMOVE or SWP_NOSIZE or SWP_SHOWWINDOW);
end;
Quisiera saber si podrian ayudarme, quisiera detectar un proceso externo en delphi,en vez de que detecte procesos internos, podrian pasarme algunos ejemplos para poderlos usar muchas gracias.

Neftali [Germán.Estévez]
15-11-2017, 09:14:41
No se a qué te refieres con "procesos internos" y "externos".
Al final imagino que hablamos de aplicaciones y/o ejecutables.

Lo importante en ese código (y que deberías entender antes de continuar) es la línea:


hNotepadWindow := FindWindow('notepad', nil);


Si buscas ayuda sobre FindWindow (https://msdn.microsoft.com/es-es/library/windows/desktop/ms633499(v=vs.85).aspx), verás que los dos parámetros son la Clase y el título de la ventana.

Si deseas ejecutar otra aplicación (usuarios.exe) deberá sconocer uno de esos dos parámetros para tu aplicación.