Vista Firewall deaktivieren

[Keks]

Ich möchte per Code die Windows-Firewall ein- und ausschalten lassen.
Dazu habe ich mir einen Code geschrieben, der in XP problemlos funktioniert und in Vista immerhin aktivieren kann und auch den aktuellen Status anzeigen kann.
Der Kern des Codes ist dieser hier:

Delphi-Quellcode:

FwMgr := CreateOLEObject('HNetCfg.FwMgr');
curFWprofile := FwMgr.LocalPolicy.CurrentProfile;
curFWprofile.FirewallEnabled := false;

Das Problem ist nun, dass das Deaktivieren in Vista scheitert. Ich erhalte dann folgende Meldung von Windows (auf Deutsch und Englisch für alle Fälle):
http://img377.imageshack.us/img377/817/vistafwad7.png
(Delphi liefert die Exception "nicht implementiert".)

Was kann man tun, damit diese Meldung nicht kommt? Lässt sich diese Überprüfung irgendwie ausschalten, damit die Firewall normal deaktiviert wird?
Das Programm verfügt über Admin-Rechte. Das ist also kein Problem.

Am liebsten wäre mir natürlich, wenn man das codeseitig ändern könnte. Falls das nicht möglich ist, wäre es auch denkbar, das von Hand einzustellen. Aber zu beidem habe ich keine Idee... Aber vielleicht jemand von Euch?

[Luckie]

Ich bin mir ziemlich sicher, dass es sich dabei um einen Dienst handelt und den müsste man stoppen können asl Administrator. Von Hand sollte man ihn in der Systemsteuerung auschalten können.

[RWarnecke]

Ich habe in der MSDN den C++ Sourcecode. Soweit ich den verstehe, kannst Du damit die Windows Firewall ein und ausschalten. Ich weiß allerdings nicht ob dieser auch unter VISTA funktioniert. Ansonsten kannste Dir auch mal die folgenden Seiten der MSDN anschauen, die sind für die Windows Firewall unter VISTA.