Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 132
  • Last Modified:

Enumerating installed network protocols

Greetings,

Does anyone have any sample code which can be used to enumerate through the installed protocols ? What I am trying to do is determine which protocols are installed (e.g. TCP/IP, NETBUI).

Thanks,

Robert Lancaster
0
zaroblan
Asked:
zaroblan
1 Solution
 
ginsonicCommented:
This function test if a protocol is installed. In this sample for IP. Just replace the IP with different protocols and test if exist .

uses Winsock;

function IsIPInstalled : boolean;
  var
  ppe : PProtoEnt;
  WSData : TWSAData;

begin
  Result:=true;
  if WSAStartup(MakeWord(1,1),WSData)=0 then
  begin
    ppe:=GetProtoByName('IP');
    if ppe=nil then
      Result:=false;
  end;
  WSACleanup;
end;
0
 
pnh73Commented:
No comment has been added lately, so it's time to clean up this TA.
I will leave a recommendation in the Cleanup topic area that this question is:

Accept answer from ginsonic

Please leave any comments here within the next seven days.
 
PLEASE DO NOT ACCEPT THIS COMMENT AS AN ANSWER!
 
Paul (pnh73)
EE Cleanup Volunteer
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now