Kasmadan resim indirme [ÇÖZÜLDÜ]

[AliZairov]

(03-01-2017, Saat: 09:44)barisatalay Adlı Kullanıcıdan Alıntı: Resimi nereye indirmek istiyorsunuz ? TImage nesnesi içerisine mi yoksa local bir yola mı ?

Merhaba. Yok Listviewde listeye ekleyeceğim. Kod parçam basit şu an listeye ekleme yaptıkça itemi resminde indiriyo. Qarip bir görüntü oluyor tek-tek listeye ekleniyo.

function TDM.getImage(url: string): TMemoryStream;
var
 MS: TMemoryStream;
 HTTP: THttpClient;
begin
 Application.ProcessMessages;
 MS := TMemoryStream.Create;
 HTTP := THttpClient.Create;
 try
   MS.Seek(0, soFromBeginning);
   HTTP.Get(url, MS);
   Result := MS;
 finally
   HTTP.Free;
   //MS.free;
 end;
end;