[hatsub]

Добрый день жители форума.
Хотелось бы сделать проверку на то, существует ли xml-лента по URL-адресу(переменная host), до того как программа выпадет в ошибку.
Помогите с реализацией. Код ниже работает, но проверки нет.

Код:

var

host:string;
XMLHTTP: Variant;
xmldomdocument: IXMLDOMDocument;
xmldomnodelist: IXMLDOMNodeList;

code:

XMLHTTP:=CreateOleObject('Microsoft .XMLHTTP');
XMLHTTP.open('GET',host, False);
XMLHTTP.send('');

if XMLHTTP.status=200 then
begin
xmldomdocument:=(IUnknown(XMLHTTP.r esponseXML) as IXMLDOMDocument);
xmldomnodelist:=xmldomdocument.getE lementsByTagName('title');
for i:=0 to 11 do
if xmldomnodelist[i].parentNode.nodeName='item'
then Listbox2.Items.Add(xmldomnodelist.i tem[i].text);
end;

Админ: Пользуемся тегами для оформления кода!