function Ping

function Ping

Previous pageReturn to chapter overviewNext page

function  Ping(AHostIP : string; ATimeOut : integer; var AReply : string) : boolean;

 

Осуществляет пинг хоста с IP адресом, заданным в AHostIP. Таймаут задается параметром ATimeOut в миллисекундах.

Функция возвращает true в случае, если хост отвечает и false, если хост не отвечает или возникли ошибки сети.

 

Независимо от возвращаемого значения функция заполняет переменную AReply дополнительными данными, разделяя значения запятой:

- код статуса. В случае успешного ответа код равен нулю, в противном случае это код ошибки WinSock, позволяющий уточнить причину ошибки

- задержка между запросом и ответом в миллисекундах

- IP хоста, который ответил на PING (должен совпадать с AHostIP)

 

Совместимость: AVZ 4.45 и выше

 

Пример:

 

var

s : string;

begin

if Ping('192.168.01', 2000, S) then

ShowMessage('Хост ответил на запрос !');

end.