FireWall detecte socket traffic

Hey. Jeg har lige fået McAfee Firewall.
Den kan fortælle mig, hvilke programmer (exefiler), der bruger sockets, hvilke porte de bruger, hvor lang tid de er koblet til, hvor mange bytes de sender og modtager, og remote\'ns ip address.
Jeg har ikke brug for at lave en firewall, men blot for et program, der finder ud af, hvilke programmer der bruger sockets altså som ovenstående.
Hvordan gør jeg dette i Delphi?