MANIPULATION DU FIREWALL XP/VISTA

WhiteHippo Messages postés 1154 Date d'inscription samedi 14 août 2004 Statut Membre Dernière intervention 5 avril 2012 - 18 avril 2007 à 21:47
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 - 22 avril 2007 à 10:09
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/42285-manipulation-du-firewall-xp-vista

cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 32
22 avril 2007 à 10:09
Voici un code source particulièrement intéressant et je salue l'effort fourni par jeanr pour adapter ce code en Delphi.
Bien sûr, j'aurais préféré que ce code soit mis dans une classe pour être plus facilement réutilisable. Ceci juste pour justifier le 9/10 :)
Encore bravo et grand merci à toi.
cs_jeanr Messages postés 17 Date d'inscription vendredi 25 avril 2003 Statut Membre Dernière intervention 12 juin 2008
21 avril 2007 à 17:07
En effet merci, ca pourrait eviter quelques soucis ^^
WhiteHippo Messages postés 1154 Date d'inscription samedi 14 août 2004 Statut Membre Dernière intervention 5 avril 2012 3
18 avril 2007 à 21:47
Bonjour Jeanr

J'ai pas vista pour tester ton appli mais à première vue j'aurais transformé le string Exe en PChar :
FwMgr.IsPortAllowed( PChar(Exe), NET_FW_IP_VERSION_V4, 0, '0.0.0.0', NET_FW_IP_PROTOCOL_TCP, Allowed, Restricted);

Cordialement.
Rejoignez-nous