Ping на Android или на iOS

[Martifan]

Доброго времени сутки

подскажите пожалуйста как реализовать пинг на Android или iOS?

то есть чтобы из моего приложении смог пинговать какой нибудь ип адрес

заранее спасибо

[Tumaso]

В Indy есть TIdICMPClient

[Ingalime]

Для платформы Андроид автор библиотеки Indy по имени Remy, приводит свои рассуждения тут:

https://stackoverflow.com/questions/25096126/delphi-xe6-and-android-ping

 

Изменено 1 сентября, 2019 пользователем Ingalime

[Martifan]

17 часов назад, Tumaso сказал:

В Indy есть TIdICMPClient

не работает на Android

[Martifan]

16 часов назад, Ingalime сказал:

Для платформы Андроид автор библиотеки Indy по имени Remy, приводит свои рассуждения тут:

https://stackoverflow.com/questions/25096126/delphi-xe6-and-android-ping

 

это я видел но как реализовать FMX не могу понять

[Ronalds Rizakovs]

У меня была похожая проблема - проверить доступен ли хост. 

Как я понял TIdICMPClient работает лиш при наличии root. Даже под win надо "as administrator" запускать.

Были варианты вызвать системную команду PING и анализировать результат, но сложно. 

Проблему обошол  с помощью IdTCPClient.

function CheckInternet: boolean;
begin
result:=false;
try
IdTCPClient1.ReadTimeout:=200;
IdTCPClient1.ConnectTimeout:=200;
IdTCPClient1.Port:=Port;
IdTCPClient1.Host:=Server;
IdTCPClient1.Connect;
IdTCPClient1.Disconnect;
result:=true;
except
result:=false;
end;
end;

Если надо время отклика проверит - не подойдот. А для доступности по моему ок!