Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Dezipaitor,
4. Mär 2009
Du musst auf SP2 oder höher testen. Sonst kommt wieder ein TRUE raus!
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Dezipaitor,
4. Mär 2009
Der ursprüngliche Code fragt nur den FW Status ab. Aber das macht er, indem er erstmal alle Rechte anfordert. Das ist aber falsch, wenn man nur mal was lesen will, da man in diesem Fall immer Adminrechte braucht. Mit dem Rest hat das nichts zu tun. Schreibend braucht man da sowieso Adminrechte - aber lesend nicht unbedingt.
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Dezipaitor,
4. Mär 2009
IsWindowsXP kannst du mit jeder beliebigen Funktion ersetzen, die auf XP (ggf. noch >= SP2) prüft, da die IsWindowsFirewallServiceActive sonst unter Win2000 TRUE zurückliefert.
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Dezipaitor,
4. Mär 2009
Tut mir leid, das ist ein Denkfehler gewesen.
Der SharedAccess-Dienst ist unter XP "Windows-Firewall/Gemeinsame Nutzung der Internetverbindung", während
in Vista es nur noch "Gemeinsame Nutzung der Internetverbindung" ist. Die WF ist ein eigener "Dienst".
Wir testen daher zuerst auf den Vista-Fall, da der in XP fehlschlägt (wenn kein anderer Dienst so heißt - muss ggf. noch mehr überprüft...
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Dezipaitor,
4. Mär 2009
D.h. sStatus.dwCurrentState muss einen anderen Wert haben, als der angezeigte. Gib ihn einfach mal aus.
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Dezipaitor,
3. Mär 2009
Ich schaue mir das mit dem Servicemanager gerade an.
Der ganze Code ist fehlerhaft und funktioniert auch unter XP nur dann, wenn man Adminrechte hat.
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Dezipaitor,
3. Mär 2009
Also das funktioniert "scheinbar" in Vista 64 nicht richtig, oder?
Wenn du etwas testest, musst du auf jeden Fall auch die Rahmenbedingungen dazu angeben, besonders dann, wenn du 64bit verwendest, da diese Plattform einfach noch nicht die große Mehrheit bei Desktopsystemen darstellt. Wenn du XP oder Vista meinst gehe zumindest ich davon aus, dass 32bit verwendet wird und werde dies dort...
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by Dezipaitor,
3. Mär 2009
Baaaaaaaaaaah!
Du musst schon genau angeben, welche Windowsversion und welche Bierzahl! Auf Win64 läuft oftmals einiges anders als auf 32Bit. Du redest also von Vista 64 aber auch über WindowsXP 32. D.h. ob es unter Vista und XP im allgemeinen funktioniert, kannst du nicht sagen.