_Leo Site Admin

Registrado: 11 Ago 2002Mensajes: 1875Ubicación: Lanzarote - Islas Canarias (España)
|
Publicado: Dom 17 Nov, 2002 9:03 am Asunto: |
|
|
Hola:
Lo siguiente te da la lista de procesos que se están ejecutando, no se si te servirá, lo he probado con BCB1 y BCB6 en Windows 95osr2 y XP:
Para probarlo solo tienes que añadir un TListBox (ListBox1) y un TButton (Button1) y en el OnClick del botón añades estas líneas:
| Código: | // Añadimos: #include<tlhelp32.h>
PROCESSENTRY32 proc = { sizeof(proc) };
HANDLE hSysSnapshot = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
if ( hSysSnapshot != reinterpret_cast<HANDLE>(-1)
&& Process32First(hSysSnapshot, &proc) )
{
do
{
char str[512];
wsprintf(str, "%s (id=%lu)", proc.szExeFile, proc.th32ProcessID);
ListBox1->Items->Add(str);
}
while ( Process32Next(hSysSnapshot, &proc) );
}
CloseHandle (hSysSnapshot); |
Y si buscas algo mas completo:
[HOWTO: Enumerate Applications Using Win32 APIs]
http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q175030&ID=KB;EN-US;Q175030
Saludos:
_Leo |
|