Hi!
Ein erster Test unter Vista Ultimate 64-bit veranlasste ihn hier
Delphi-Quellcode:
if not ServiceActive
or not FirewallActive
or (FirewallActive and not ExceptionsAllowed) then
Exit;
zum Exit - natürlich bei laufender Firewall und Ausnahmen zugelassen.
Ciao, Frederic