Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)
-   -   como cerrar una tercera applicacion (https://www.clubdelphi.com/foros/showthread.php?t=58995)

sidneyb 08-08-2008 20:38:31

como cerrar una tercera applicacion
 
Buenas tardes foro, mis mas cordiales saludos.

Tengo el siguiente problema, estoy creando una aplicacion que me permite ver que esta ejecutandose cada cierto tiempo en windows, a la vez, si es una aplicacion que no quiero que ejecuten la cierro, por ejemplo, estan navegando en internet con Iexplore.exe, y quiero cerrar ese programa. En el foro consegui el siguiente ejemplo

Código Delphi [-]
var  
Indicador :Integer
begin
  Indicador := FindWindow(Nil, Pchar('titulo ventana'));
  if Indicador <> 0 then 
  begin
    PostMessage(Indicador, WM_QUIT, 0, 0);
  end;
end;

me funciono, pero sabiendo el titulo exacto de la ventana, pero en caso de que sea por ejemplo el Iexplore en el que tiene un titulo infinitamente variable en sus ventanas, no me cumple con lo que quiero en estos casos...Como puedo hacer para en vez de manejar el titulo de la ventana, utilizar el nombre de la aplicacion que quiero cerrar?:confused:

dec 08-08-2008 21:01:14

Hola,

Creo que tendrás que trabajar, en lugar de con ventanas, con procesos, que también puedes "listar", como se muestra en este hilo y en este otro. Busca en todo caso información sobre esto, y sobre cómo "matar" procesos. Sin embargo, me parece que un usuario avispado podría cambiar el nombre de un determinado archivo ejecutable, de modo que tú no lo "encontraras"... ignoro si se puede llevar un poco más allá el asunto, de forma que se mire "dentro" de un proceso, tratando de evitar así esto último que digo. A ver si algún compañero nos pone sobre la pista.

escafandra 09-08-2008 22:40:17

También encontrarás información en este hilo y también en este.

Saludos.


La franja horaria es GMT +2. Ahora son las 01:31:44.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi