XE7 Ersatz für WinInet aus Delphi7

[MarkSE]

Hallo Gemeinde,
ich hatte in Delphi7 ein FTP-Download-Files-Routine mit WinInet geschrieben. Das funktionierte auch gut.

Delphi-Quellcode:

uses
 WinInet,IdTCPClient, IdMessageClient,IdComponent,IdMessage,
     usw.;

Und die Funktion zum Download:

Delphi-Quellcode:

function FtpDownloadFile(FtpServer, FTPUser, ftpPW, FtpPort): Boolean;
const
  READ_BUFFERSIZE = 4096;   
var
  hFTP, hFile,: HINTERNET;

In XE7 gibt es leider unter anderem WinInet und auch HINTERNET nicht mehr.
Kann jemand bitte mir verraten, welches Tool/Komponente ich statt dessen
nehmen darf, damit ich z.B. folgendes benutzen kann?

Delphi-Quellcode:

  hFTP := InternetConnect(hNet,PChar(FtpServer),Port, PChar(ftpUser),
                          PChar(ftpPW),INTERNET_SERVICE_FTP,
                          0,  // oder INTERNET_FLAG_PASSIVE
                          0);
  if hFTP = nil then
             // fehler internet behandeln