Тема: TListBox
Показать сообщение отдельно
  #7  
Старый 12.03.2011, 21:05
Assistant Assistant вне форума
Продвинутый
 
Регистрация: 20.02.2011
Адрес: там где правят идиоты
Сообщения: 603
Версия Delphi: 7
Репутация: выкл
По умолчанию

Код:
var
  b: string;
begin
  XMLDocument1.LoadFromFile('http://mobile-review.com.feedsportal.com/c/33244/f/557683/index.rss');
  XMLDocument1.Active := True;
  b := XMLDocument1.DocumentElement.ChildNodes['channel'].ChildValues['title'];
  XMLDocument1.Active := False;
  ShowMessage(b);
end;
Ответить с цитированием