![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
He tenido oportunidad de probar esto en un Windows 7 64 bits y funciona. Lista las aplicaciones de 32 y 64 bits.
Código:
Procedure TFTask.ProcList(Lista: TlistBox); begin Lista.Clear; FTask.FSnapshotHandle:=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0); FTask.FProcessEntry32.dwSize:=Sizeof(FTask.FProcessEntry32); if Process32First(FTask.FSnapshotHandle,FTask.FProcessEntry32) then begin repeat Lista.Items.Add(FTask.FProcessEntry32.szExeFile); until integer(Process32Next(FTask.FSnapshotHandle,FTask.FProcessEntry32))=0; end; CloseHandle(FTask.FSnapshotHandle); end; |
#2
|
||||
|
||||
Perdón, ese código pertenece a una clase y aislado pierde sentido. Pongo el código aislado e independiente. Devuelve el listado en un TStrings con lo que se podrá usar un TMemo, TListBox, o cualquier objeto que tenga un TStringList.
Lo he probado en Windows XP 32 bits y Windows 7 64 bits pero no en Vista. Se que es equivalente a CreateWin9xProcessList. Quizás el proceso global de listado sólo deba llamar a CreateWin9xProcessList y éste procedimiento debería perder el -Win9x- de su nombre, para evitar confusiones.
Saludos. Última edición por escafandra fecha: 08-07-2010 a las 21:30:34. |
![]() |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Lista de Procesos y Terminal Server. | eLYaN | API de Windows | 1 | 29-06-2007 23:39:50 |
Acceder a la lista de procesos | IZO | API de Windows | 9 | 25-04-2007 20:31:44 |
Lista de procesos de mi ordenador | Reinery | C++ Builder | 7 | 16-12-2006 01:15:05 |
¿Cómo ocultar programa de lista de procesos de xp? | israelgs | C++ Builder | 13 | 27-04-2006 14:14:37 |
Ocultar una aplicacion de la lista procesos w2000 | marceloalegre | Varios | 0 | 02-05-2005 16:26:19 |
![]() |
|