RSS/Atom Feed auslesen

[xZise]

Naja, sogut wie

[edit=1]Ich versuche gerade ein Atom Feed zu laden:

Code:

<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
  <author>
    <name>Autor des Weblogs</name>
  </author>
  <id>urn:uuid:60a76c80-d399-11d9-b93C-0003939e0af6</id>

  <entry>
    <title>Titel des Weblog-Eintrags</title>
    <link href="http://example.org/2003/12/13/atom-beispiel"/>
    <id>urn:uuid:1225c695-cfb8-4ebb-aaaa-80da344efa6a</id>
    <updated>2003-12-13T18:30:02Z</updated>
    <summary>Zusammenfassung des Weblog-Eintrags</summary>
    <content>Volltext des Weblog-Eintrags</content>
  </entry>

</feed>

Mit folgenden Code:

Delphi-Quellcode:

subNode := xml.documentElement.selectSingleNode('author');
subNode := subNode.selectSingleNode('name');
author := subNode.text;


FTitle := 'ATOM Feed';

items := xml.documentElement.selectNodes('entry');
for i := 0 to items.length - 1 do
begin
  fiBuffer := TFeedItem.Create;
  subNode := items.item[i].selectSingleNode('title');
  fiBuffer.Title := subNode.text;

  subNode := items.item[i].selectSingleNode('summary');
  fiBuffer.Text := subNode.text;

  fiBuffer.Author := author;

  Add(fiBuffer);
end;

Problem ist nur, dass er irgendwie weder ein entry noch author findet.
xml.documentElement.selectSingleNode('author'); ist nil.
for i := 0 to items.length - 1 do wird nicht reingesprungen (.Length ist also <= 0)[/edit]

MfG
xZise