Delphi 2010 idhttp выдает ошибку? Выскакивает ошибка Выделяет строку: В IDHTTP В этой функцие PHP: function TIdHTTPProtocol.ProcessResponse(AIgnoreReplies: array of SmallInt): TIdHTTPWhatsNext; procedure CheckException(AResponseCode: Integer; ALIgnoreReplies: array of Smallint; AUnexpectedContentTimeout: Integer = IdTimeoutDefault); var i: Integer; LTempResponse: TMemoryStream; LTempStream: TStream; begin LTempResponse := TMemoryStream.Create; try LTempStream := Response.ContentStream; Response.ContentStream := LTempResponse; try FHTTP.ReadResult(Response, AUnexpectedContentTimeout); if High(ALIgnoreReplies) > -1 then begin for i := Low(ALIgnoreReplies) to High(ALIgnoreReplies) do begin if AResponseCode = ALIgnoreReplies[i] then begin Exit; end; end; end; LTempResponse.Position := 0; raise EIdHTTPProtocolException.CreateError(AResponseCode, FHTTP.ResponseText, ReadStringAsCharset(LTempResponse, FHTTP.Response.CharSet)); finally Response.ContentStream := LTempStream; end; finally FreeAndNil(LTempResponse); end; end; Пользуюсь делфи 2010
Это не ошибка. Иди ты в Gooooooooooooooooooooooooogle. Достал тупые темы создавать. Еще пол-года назад, когда я пришел на этот форум средний IQ юзеров был гораздо выше, нежели нынче.
используй Code: try except end; на except'e Code: if http.responsecode = 302 then http.get('http://site.com'+http.response.location); ну или немного иначе... смотря куда редирект может біть вообще Code: http.get(http.response.location);