Einzelnen Beitrag anzeigen

Peter666

Registriert seit: 11. Aug 2007
357 Beiträge
 
#1

THTTPClient unter Windows geht nicht richtig

  Alt 25. Jan 2021, 16:11
Hi, ich habe folgendes Problem:

Delphi-Quellcode:
procedure TForm3.FormCreate(Sender: TObject);
var
  http: THttpClient;
  stream: TMemoryStream;
begin

  stream := TMemoryStream.Create;
  http := THttpClient.Create;
  http.HandleRedirects := true;
  try
    try
      http.Get('https://cdn.wallpapersafari.com/81/79/vl5G7p.jpg', stream);
      stream.Position := 0;
    except
    end;
  finally
    http.DisPoseOf;
  end;
  Image1.Bitmap.LoadFromStream(stream);
  stream.free;
end;
Der oben stehende Code sollte ein Bild in eine Bitmap laden. Irgendwie verweigert aber die Klasse unter Windows bei dem Code die Arbeit. Unter OSX, Android und iOS geht das aber problemlos. Ich mag aber nicht auf Indy umstellen, sondern lieber den Nativen Code von Embarcadero nutzen. Soweit ich mich erinnere ging das aber unter 10.3 ohne Murren und Knurren.

Peter
  Mit Zitat antworten Zitat