Hi,
May be someone else can give a better solution but what I understood is that:
Try to break the last line in two parts. First get response and then after checking the status message get it in result stream.
HttpResponseMessage = HttpWebRequest.GetResponse;
IF HttpWebStatus.Equals(HttpResponseMessage.StatusCode,HttpWebStatus.OK) THEN BEGIN
ResultStream := HttpResponseMessage.GetResponseStream;