IdHTTP Il suffit d'obtenir du code de réponse

Question

J'utilise IDHTTP (INDY) pour effectuer une vérification du site Web. Tout ce que je veux, c'est vérifier le code de réponse du serveur après que ma demande a été envoyée, je ne veux pas réellement recevoir la sortie HTML du serveur car je ne surveille que un code de 200 ok, tout Autre code, ce qui signifie qu'il existe un problème de forme.

J'ai recherché les documents d'aide idhttp et la seule façon de voir pour possible le faire serait d'attribuer le code à un MemoryStream Et puis effacez-le immédiatement, mais ce n'est pas très efficace et utilise la mémoire qui n'est pas nécessaire. Existe-t-il un moyen d'appeler un site et d'obtenir la réponse mais d'ignorer le HTML renvoyé plus efficace et ne gaspille pas la mémoire?

Actuellement, le code ressemblerait à ceci. Cependant, c'est juste un exemple de code que je n'ai pas encore testé, je l'utilise simplement pour expliquer ce que j'essaie de faire.

Procedure Button1Click(Sender: TObject);

var
http : TIdHttp;
s : TStream;
url : string;
code : integer;

begin 

   s := TStream.Create();
   http := Tidhttp.create();
   url := 'http://www.WEBSITE.com';

   try

    http.get(url,s);
    code := http.ResponseCode;
    ShowMessage(IntToStr(code));

   finally

   s.Free();
   http.Free();

end;