Class TICMP (unit icmp)

Inherits from

TObject

The object wich encapsulate the ICMP.DLL

Constructors


constructor Create;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


Functions

destructor Destroy;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

function GetErrorString : String;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

function Ping : Integer;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

procedure SetAddress(Value : String);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

procedure ResolveAddr;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

Properties

property Address : String


property ErrorCode : Integer


property ErrorString : String


property HostIP : String


property HostName : String


property Reply : TIcmpEchoReply


property Size : Integer


property Timeout : Integer


property TTL : Integer


Events

event OnDisplay : TICMPDisplay


event OnEchoReply : TICMPReply


event OnEchoRequest : TNotifyEvent


Variables

FAddress : String;

ICMP Echo reply buffer

FAddrResolved : Boolean;

After sending ICMP packet

FHostIP : String;

Dotted IP of host (output

FHostName : String;

Address given

FIPAddress : TIPAddr;

Name of host (Output

FLastError : DWORD;


FOnDisplay : TICMPDisplay;

Time To Live (for send

FOnEchoReply : TICMPReply;


FOnEchoRequest : TNotifyEvent;

Event handler to display

FReply : TIcmpEchoReply;

Handle for the ICMP Calls

FSize : Integer;

Address of host to contact

FTimeOut : Integer;

Packet size (default to 56

FTTL : Integer;

Timeout (default to 4000mS

hICMP : THandle;


hICMPdll : HModule;


IcmpCloseHandle : TIcmpCloseHandle;


IcmpCreateFile : TIcmpCreateFile;

Handle for ICMP.

IcmpSendEcho : TIcmpSendEcho;



Constructors


constructor Create;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


Functions


destructor Destroy;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


function GetErrorString : String;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


function Ping : Integer;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


procedure SetAddress(Value : String);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


procedure ResolveAddr;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


Properties


property Address : String


property ErrorCode : Integer


property ErrorString : String


property HostIP : String


property HostName : String


property Reply : TIcmpEchoReply


property Size : Integer


property Timeout : Integer


property TTL : Integer


Events


event OnDisplay : TICMPDisplay


event OnEchoReply : TICMPReply


event OnEchoRequest : TNotifyEvent


Variables


FAddress : String;

ICMP Echo reply buffer


FAddrResolved : Boolean;

After sending ICMP packet


FHostIP : String;

Dotted IP of host (output


FHostName : String;

Address given


FIPAddress : TIPAddr;

Name of host (Output


FLastError : DWORD;


FOnDisplay : TICMPDisplay;

Time To Live (for send


FOnEchoReply : TICMPReply;


FOnEchoRequest : TNotifyEvent;

Event handler to display


FReply : TIcmpEchoReply;

Handle for the ICMP Calls


FSize : Integer;

Address of host to contact


FTimeOut : Integer;

Packet size (default to 56


FTTL : Integer;

Timeout (default to 4000mS


hICMP : THandle;


hICMPdll : HModule;


IcmpCloseHandle : TIcmpCloseHandle;


IcmpCreateFile : TIcmpCreateFile;

Handle for ICMP.DLL


IcmpSendEcho : TIcmpSendEcho;