Здравствуйте. Помогите, пожалуйста с настройкой контроля связи с антенной.
Создал скрипт "Запуск проекта"
begin
{ запускаем пинг хоста "10.0.6.100" с максимальным
ожиданием ответа не более 3 сек. }
StartPing('10.0.6.100', 3000);
end.
Далее создал скрипт "Изменился пинг",
begin
{ выводим результат пинга в компонент "Text10" }
if PingData.Result then
Text10.Text := 'Хост ' + PingData.Host + ' доступен!'
else
Text10.Text := 'Хост ' + PingData.Host + ' не доступен!'
end.
Постоянно горит, что хост не доступен, хотя через командную строку всё пингуется. Во вложении скрины кода.
Подскажите, куда копать?