Код
- Код: Выделить всё
Client := TFPHTTPClient.Create(nil);
try
Response := Client.Post(Url);
Online := true;
except
on E: ESocketError do begin
Online := false;
exit;
end;
end;
При отсутствии сети вылетает ESocketError: Host name resolution for "...host..." failed.
Вопрос – почему не тушится исключение?
В Интернетах пишут, что нужно включать release mode, но я не нашел информации о том, что это такое и как это сделать.
Буду благодарен за помощь.