Показать сообщение отдельно
  #2  
Старый 28.10.2018, 16:10
ImDoode ImDoode вне форума
Прохожий
 
Регистрация: 02.12.2010
Сообщения: 15
Репутация: 10
По умолчанию

Решено
Код:
  on E: EIdHTTPProtocolException do begin
    if E.ErrorCode = 401 then
      x := E.ErrorMessage
    else
      raise;
  end;
__________________
Не пускайте детей в интернет.
Ответить с цитированием