[lux16]

Код:

var
 http: TIdHTTP;
 ms: TMemoryStream;
begin
 http := TIdHTTP.Create(nil);
 http.Get('http://site.ru/test.txt', ms);
 ms.Position := 0;
 ms.SaveToFile('file.txt');
 ms.Free;
 http.Free;
end;