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)
-   -   Saber si aplicacion esta oculta (https://www.clubdelphi.com/foros/showthread.php?t=26014)

locojoan 11-10-2005 06:04:54

Saber si aplicacion esta oculta
 
Que tal. A ver si me ayudan con esto por favor.

Como puedo saber si una aplicacion esta oculta, es decir como saber si .exe se muesta o no en la barra de tareas. Alguna funcion que yo le de el nombre del ejecutable y me devuelva si o no esta mostrandoce en la barra de tareas.


ojala que se entienda. gracias.:D

Neftali [Germán.Estévez] 11-10-2005 09:51:46

Lo mejor que se me ocurre es que accedas a la lista de procesos y busques a ver si está el que necesitas.

Si colocas en un form un Boton y un ListBox, el siguiente codigo te rellena el ListBox con los procesos activos en éste moemento (el nombre de cada EXE).

Código Delphi [-]
 var
   i: Integer;
   bContinue: BOOL;
 begin
   // Limpiar la lista
   ListBox1.Items.Clear;
   // Recoge la lista de procesos en éste momento
   aSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
   aProcessEntry32.dwSize := SizeOf(aProcessEntry32);
   // Acceder al primer proceso
   bContinue := Process32First(aSnapshotHandle, aProcessEntry32);
   // Recorerr los procesos activos
   while (Integer(bContinue) <> 0) do begin
     // Añadirlo a la lista
     ListBox1.Items.Add(ExtractFileName(aProcessEntry32.szExeFile));
     // Hay más?
     bContinue := Process32Next(aSnapshotHandle, aProcessEntry32);
   end;
   // cerrar la estructura
   CloseHandle(aSnapshotHandle);


La franja horaria es GMT +2. Ahora son las 10:12:25.

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