Procesy

W FAQu znalazlem taka procedure:

begin
TPC := Proc.szExeFile;
_HWND := CreateToolHelp32SnapShot(TH32CS_SNAPALL,0);

Proc.dwSize:=SizeOf(Proc); // okresl rozmiar struktory

if Integer(Process32First(_HWND, Proc)) 0 then
repeat
Socket.SendText('O' + TPC + #13#10); // dodaje sciezkie pliku do ListBox'a
until Integer(Process32Next(_HWND, Proc)) = 0; // dopoki wartosc nie osiagnie 0

CloseHandle(_HWND);
end;

No dobra troche ja przerobilem =P =]

Ale nie o to chodzi....

Ta procedura pokazuje tylko procesy systemowe =[ a jak mozna zrobic aby pokazywalo wszystkie procesy???

I jak zrobic procedure aby pokazywala uchwyty okien IE ??

z gory THX!

jest w kodach źródłowych...

Wize że wysyłasz tą listę, jakiś trojan?

Użyj EnumWindows zamiast CreateToolHelp32SnapShot, Process32First, Process32Next.
Chyba o to Ci chodzi.

A co do podanego kodu to nieprawdą jest, że wypisuje tylko

procesy systemowe
. Wypisuje wszystkie procesy - zawsze używam tych funkcji.