Всё тот же процесс-менеджер!

← →
SpyBoy © (2006-01-01 21:08) [0]

VAR
Wnd : hWnd;
buff: array [0..127] of Char;
begin
ListBox1.Clear;
Wnd:=GetWindow(Handle, gw_HWndFirst);
while Wnd<>0 do
begin //Не показываем:
if (Wnd<>Application.Handle) and //-Собственное окно
(IsWindowVisible(Wnd)or checkbox1.Checked)and//-Невидимые окна
((GetWindow(Wnd, gw_Owner)=0)or checkbox2.Checked) and//-Дочернии окна
(GetWindowText(Wnd, buff, sizeof(buff))<>0) //-Окна без заголовков
then
begin
GetWindowText(Wnd, buff, sizeof(buff));
ListBox1.Items.Add(StrPas(buff));
end;
Wnd:=GetWindow(Wnd, gw_hWndNext);
end;listbox1.Sorted:=true;

← →
SpyBoy © (2006-01-01 21:13) [1]

По идее должен показывать все процы, однако Простой *.exe(только uses windows) не отображается :(

← →
Anton_K © (2006-01-01 21:53) [2]

C чего ты взял, что все процессы имеют окна?

← →
SpyBoy © (2006-01-01 22:44) [3]

Ну тогда скажи, что делать !

Используй функции:
CreateToolhelp32Snapshot
Process32First
Process32Next

Всё тот же процесс-менеджер! Найти похожие ветки