Kiminle konuştuğunuza bağlı olarak, blog kişisel bir Web günlüğü, yorumlarla kısa, tarihli tartışmalar topluluğudur veya haber ve bilgi yayınlamanın bir yoludur. Delphi Hakkında Programlama Giriş sayfası bir blog gibi davranır.
Bir Delphi projesi içindeki en son başlıkları görüntüleyebilmek için önce XML dosyasını indirmeniz gerekir. Bu XML dosyası günlük bazda güncellendiğinden (yeni girişler eklendi), belirtilen URL'nin içeriğini bir dosyaya kaydetmek için tasarlanmış koda ihtiyacınız olacaktır.
Yeni bir Delphi projesi oluşturun ve bir TListView (Name: 'LV') bileşenini forma bırakın. Bir TButton (Ad: 'btnRefresh') ve bir TXMLDocument (Ad: 'XMLDoc') ekleyin. Ardından, ListView bileşenine üç başlık ekleyin (Başlık, Bağlantı ve Açıklama). Son olarak, XML dosyasını indirmek için kodu ekleyin, TXMLDocument ile ayrıştırın ve düğmenin OnClick olay işleyicisinde ListView içinde görüntüleyin.
XMLDoc öğesinin DocumentElement özelliği, belgenin kök düğümüne erişim sağlar. Bu kök düğüm elementtir. Sonra, ChildNodes. İlk olarak tek alt düğümü, düğüm olan öğeye döndürür. Şimdi, ChildNodes. FindNode ('item') ilk "et" düğümünü bulur. İlk düğüme sahip olduğumuzda, belgedeki tüm "et" düğümleri üzerinden tekrarlanırız. NextSibling yöntemi, bir düğümün üst öğesinin sonraki alt öğesini döndürür.
Bu kadar. Tam kaynağı indirdiğinizden emin olun. Ve elbette, Delphi Programlama Forumumuzda bu makaleye herhangi bir yorum göndermekten çekinmeyin ve cesaretlendirin.