Загрузка изображения из сервера на TIMAGE

[beegl]

Помогите загрузить изображения из сервера на TIMAGE (RxGIFAnimator)
Так что-то не грузит:

procedure TForm1.RxGIFAnimator1DblClick(Sender: TObject);
var
  FS: TFileStream;
  Url, FileName: String;
  I: Integer;
begin
  for I := 7400 to 7500 do
  begin
    Url := 'https://commons.wikimedia.org/wiki/File:COVID-19-outbreak-timeline.gif' + IntToStr(I) +  '.gif';
    FileName := 'D:\' + IntToStr(I) + '.gif';
    FS := TFileStream.Create(FileName, fmCreate);
    try
      try
        try
          IdHTTP1.Get(Url, FS);
        except
          on E: EIdHTTPProtocolException do
            Continue;
        end;
        Application.ProcessMessages;
      finally
        Fs.Free;
      end;
    except
      DeleteFile(FileName);
    end;
  end;
end;

И в TMS примере WebImage не грузит картинку как результат роботы

[beegl]

загрузил: (скачать)