function Downl0ad_MasteR_XD(url:string; sfile:string) : string;
var
  IdHTTP: TIdHTTP;
  memorystream: TMemoryStream;
begin
result:= '';
  IdHTTP:=TIdHTTP.Create(nil);
  memorystream:=TMemoryStream.Create;
   try
    IdHTTP.Get(url, memorystream);
    memorystream.Position:=0;
    MemoryStream.SaveToFile(sfile);
   finally
    memorystream.Free;
    IdHTTP.Free;
  end;
result:=':)';
end;