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!