TIdHTTP Delphi – odbiór danych z serwera, obsługa HTTPS, timeouty, przykłady

Pytanie

TIdHTTP odbiór danych od servera delphi

Odpowiedź Sztucznej Inteligencji

Bezpośrednia odpowiedź na pytanie

• Do odbioru danych z serwera w Delphi przy użyciu komponentu TIdHTTP należy:
  1. Utworzyć klienta TIdHTTP (ew. dynamicznie).
  2. (Dla HTTPS) podpiąć TIdSSLIOHandlerSocketOpenSSL i ustawić wersję TLS.
  3. Wykonać Get, Post lub inną metodę HTTP – tekst odbieramy jako string, pliki/duże dane do TStream.
  4. Obsłużyć kody statusu, wyjątki (EIdHTTPProtocolException, EIdSocketError).
  5. (Opcjonalnie) przenieść komunikację do wątku, aby nie blokować GUI.

Kluczowe punkty
• Blokujący charakter Indy → używaj wątków/TTask.
• SSL wymaga bibliotek OpenSSL w folderze EXE.
• Zarządzaj timeoutami: ConnectTimeout, ReadTimeout.
• Zawsze zwalniaj obiekty w finally.

Szczegółowa analiza problemu

1. Minimalny przykład (GET, tekst)

uses IdHTTP, SysUtils;
function GetText(const Url: string): string;
var
  Http: TIdHTTP;
begin
  Http := TIdHTTP.Create(nil);
  try
    Http.ConnectTimeout := 5000;   // ms
    Http.ReadTimeout    := 10000;
    Result := Http.Get(Url);       // blokujące
  finally
    Http.Free;
  end;
end;

2. HTTPS i wymuszenie TLS ≥ 1.2

uses IdHTTP, IdSSLOpenSSL;
function GetSecureText(const Url: string): string;
var
  Http: TIdHTTP;
  SSL : TIdSSLIOHandlerSocketOpenSSL;
begin
  Http := TIdHTTP.Create(nil);
  SSL  := TIdSSLIOHandlerSocketOpenSSL.Create(Http);  // właścicielem staje się Http
  try
    SSL.SSLOptions.Method      := sslvTLSv1_2;
    SSL.SSLOptions.SSLVersions := [sslvTLSv1_2, sslvTLSv1_3]; // jeśli kompilacja OpenSSL obsługuje 1.3
    Http.IOHandler := SSL;
    Result := Http.Get(Url);
  finally
    Http.Free; // zwolni także SSL
  end;
end;

3. Pobieranie pliku / danych binarnych

procedure DownloadFile(const Url, FileName: string);
var
  Http : TIdHTTP;
  Fs   : TFileStream;
begin
  Http := TIdHTTP.Create(nil);
  Fs   := TFileStream.Create(FileName, fmCreate);
  try
    Http.Get(Url, Fs);            // zapis bezpośrednio do pliku
  finally
    Fs.Free;
    Http.Free;
  end;
end;

4. Wątkowe wywołanie (uniknięcie zamarzania GUI)

TTask.Run(
  procedure
  var S: string;
  begin
    try
      S := GetText('https://api.ipify.org?format=json');
      TThread.Queue(nil,
        procedure
        begin
          Memo1.Text := S;         // aktualizacja UI w głównym wątku
        end);
    except
      on E: Exception do
        TThread.Queue(nil,
          procedure
          begin
            ShowMessage('Błąd: ' + E.Message);
          end);
    end;
  end);

5. Zaawansowane elementy

• Nagłówki:

Http.Request.CustomHeaders.Values['Authorization'] := 'Bearer ' + Token;

• Ciasteczka: IdHTTP.CookieManager := IdCookieManager1;
• Kompresja: Http.Compressor := TIdCompressorZLib.Create(Http);
• Proxy:

Http.ProxyParams.ProxyServer := 'proxy.local';
Http.ProxyParams.ProxyPort   := 8080;

• Przekierowania: Http.HandleRedirects := True; Http.RedirectMaximum := 5;

6. Obsługa wyjątków

try
  S := Http.Get(Url);
except
  on E: EIdHTTPProtocolException do
    LogFmt('HTTP %d %s, body=%s', [E.ErrorCode, Http.ResponseText, E.ErrorMessage]);
  on E: EIdSocketError do
    Log('Błąd gniazda: ' + E.Message);
end;

Aktualne informacje i trendy

• Indy 10.6/10.7 otrzymało poprawki dla TLS 1.3, jednak pełne HTTP/2 nie jest obsługiwane; przy potrzebie HTTP/2/3 warto rozważyć WinHttp lub System.Net.HttpClient (dostępny od Delphi XE8+).
• Coraz częściej serwery egzekwują TLS ≥ 1.2, HSTS oraz nagłówki CORS – klient powinien respektować poprawne SNI i walidację certyfikatu.
• W nowoczesnych aplikacjach desktopowych popularne jest łączenie Indy (dla kompatybilności) z bibliotekami typu TRESTClient (REST.Backend) lub Grijjy.Cloud.

Wspierające wyjaśnienia i detale

• TIdHTTP konwertuje odebrane bajty do Unicode na podstawie nagłówka Content-Type; jeśli serwer nie zwraca charsetu – można wymusić:

  Http.Response.ContentType := 'application/json; charset=utf-8';

• Operacje są synchroniczne – nie istnieje „wewnętrzny async” w Indy; cała asynchroniczność wymaga wątków.
• Biblioteki OpenSSL: do wersji 1.1.x → libssl-1_1.dll, libcrypto-1_1.dll; od Indy 10.7 można użyć 3.x po podmianie pliku IdOpenSSLSetLibPath.

Aspekty etyczne i prawne

• Odbierając dane osobowe musisz spełnić wymogi RODO/GDPR: transmisja TLS, szyfrowanie dyskowe plików tymczasowych.
• Wyłączenie weryfikacji certyfikatu (VerifyMode := []) łamie podstawowe zasady bezpieczeństwa – rób to wyłącznie w środowisku testowym.
• Jeśli aplikacja działa w firmie, sprawdź politykę korzystania z proxy i logowania ruchu (compliance, ISO 27001).

Praktyczne wskazówki

1. Trzymaj jedną instancję TIdHTTP na wątek zamiast tworzyć ją na każde żądanie (oszczędność gniazd).
2. Ustaw ConnectTimeout oraz ReadTimeout adekwatnie do jakości sieci, a w logice aplikacji przewiduj powtarzanie żądań („retry with exponential back-off”).
3. Loguj pełne zapytanie i odpowiedź (bez danych wrażliwych) – pomoże w debugowaniu błędów 4xx/5xx.
4. Przy pobieraniu dużych plików rozważ Range/ResumeSupported i obsługę postępu (OnWork, OnWorkBegin, OnWorkEnd).

Ewentualne zastrzeżenia lub uwagi dodatkowe

• Indy nie obsługuje WebSocket ani HTTP/2 – jeżeli serwer wymaga tych protokołów, wybierz alternatywną bibliotekę (ICS, Grijjy, WinHttp).
• Na platformach mobilnych (Delphi FMX) System.Net.HttpClient korzysta z natywnych stosów i bywa lżejszy niż Indy.
• Aktualizacja OpenSSL w aplikacji wymaga ponownej certyfikacji w sklepie Microsoft Store / Notary Apple.

Sugestie dalszych badań

• Sprawdź RESTRequest4Delphi – nakładkę upraszczającą wywołania REST z Indy.
• Przetestuj System.Net.URLClient.THTTPClient pod kątem HTTP/2 oraz obsługi certyfikatów typu PFX.
• Jeśli potrzebujesz SSE (Server-Sent Events) lub gRPC – rozważ biblioteki zewnętrzne (Habarisoft, Grpc.pas).
• Zajrzyj do repozytorium Indy na GitHub → sekcja Issues w sprawie TLS 1.3 i przyszłego HTTP/2.

Krótkie podsumowanie

TIdHTTP pozostaje solidnym klientem HTTP w Delphi. Umożliwia łatwe pobieranie danych tekstowych i binarnych, wymaga jednak:
• podpięcia OpenSSL dla HTTPS,
• ręcznego wątkowania w celu zachowania responsywności GUI,
• starannej obsługi wyjątków oraz kodów statusu.

Dla nowych projektów warto rozważyć System.Net.HttpClient lub biblioteki wspierające HTTP/2, lecz Indie zapewnia największą kompatybilność wsteczną. Dzięki powyższym wskazówkom zbudujesz bezpieczny, stabilny mechanizm odbioru danych od serwera w Delphi.