Delphi: подключения процесса - Программирование

Ghost · 03.03.2003, 09:00

Как в Delphi, зная PID процесса, орпеделить какие порты и протоколы он (процесс) в данный момент использует и использует ли вообще?
Фактически необходимо написать прогу - аналог netstat, которая выводит информацию о подключениях. Т.е. программа создает список процессов, а потом для каждого процесса определяет подключения и выводит их.
Программы-сканеры (реализующие просмотр всех портов и проверяющие есть ли по ним подключения) не подходят, т.к. портов 65 тысяч с хвостиком и, чтобы всех их проверить, уйдет уйма времени. Программа должна выводить информацию быстро.

*helldomain* · 05.03.2003, 08:27

Prosche wsego zdes ispolzowat hooking - t.e. perehwatiwat zapusk prilojeniya i podmenyat swoimi rutinami wizowi na barahlo iz WSOCK32.DLL. Ischi w nete po keywordam API HOOKING.

03.03.2003, 09:00	# 1
Ghost ::VIP:: Звезда первого сезона Молчун-2004 Регистрация: 24.08.2002 Сообщения: 1 575	Delphi: подключения процесса Как в Delphi, зная PID процесса, орпеделить какие порты и протоколы он (процесс) в данный момент использует и использует ли вообще? Фактически необходимо написать прогу - аналог netstat, которая выводит информацию о подключениях. Т.е. программа создает список процессов, а потом для каждого процесса определяет подключения и выводит их. Программы-сканеры (реализующие просмотр всех портов и проверяющие есть ли по ним подключения) не подходят, т.к. портов 65 тысяч с хвостиком и, чтобы всех их проверить, уйдет уйма времени. Программа должна выводить информацию быстро. __________________ Действовать надо тупо и это лучшее доказательство нашей чистоты и силы!

05.03.2003, 08:27	# 2
helldomain Administrator Регистрация: 13.05.2002 Сообщения: 11 227	Prosche wsego zdes ispolzowat hooking - t.e. perehwatiwat zapusk prilojeniya i podmenyat swoimi rutinami wizowi na barahlo iz WSOCK32.DLL. Ischi w nete po keywordam API HOOKING. __________________ Осколки прошлого, как снег, закрутит ураган времён, В ушедший день для нас навек, обрушив мост, Оставив в наших душах след, тьма уплывёт за горизонт, И в чистом небе вспыхнет свет, свет новых звёзд.