Проверить состояние сети

[Astghik]

Скажите пожалуйста, как проверить состояние сети (Rad Studio 10.2).

[ENERGY]

Вот вариант предложенный Равилем (я его немного изменил):

Кстати на Android есть методы ОС для этого, они гораздо быстрее.

uses System.Net.HttpClient

function CheckInternet: boolean;
begin
  Result := false;
  with THTTPClient.Create do
  try
    try
      Result := Head('http://google.com').StatusCode < 400;
    except
    end;
  finally
    Free;
  end;
end;    

 

Изменено 16 мая, 2017 пользователем ENERGY