Afhankelijk van met wie je praat, is een blog een persoonlijk webdagboek, een verzameling korte, gedateerde discussies met commentaar of een manier om nieuws en informatie te publiceren. Welnu, de About Delphi Programming Home-pagina fungeert als een blog.
Om de laatste koppen in een Delphi-project te kunnen weergeven, moet u eerst het XML-bestand downloaden. Aangezien dit XML-bestand dagelijks wordt bijgewerkt (nieuwe vermeldingen toegevoegd), hebt u code nodig die is ontworpen om de inhoud van een opgegeven URL in een bestand op te slaan.
Maak een nieuw Delphi-project en zet een TListView (naam: 'LV') -component neer op een formulier. Voeg een TButton (naam: 'btnRefresh') en een TXMLDocument (naam: 'XMLDoc') toe. Voeg vervolgens drie kolommen toe aan de ListView-component (titel, link en beschrijving). Voeg ten slotte de code toe om het XML-bestand te downloaden, ontleed het met TXMLDocument en geef het weer in de ListView in de OnClick-gebeurtenishandler van de knop.
De eigenschap DocumentElement van XMLDoc biedt toegang tot het hoofdknooppunt van het document. Dit rootknooppunt is het element. Vervolgens ChildNodes. Eerst retourneert het enige onderliggende knooppunt naar het element, dat is het knooppunt. Nu, ChildNodes. FindNode ('item') vindt het eerste "vlees" -knooppunt. Zodra we het eerste knooppunt hebben, doorlopen we eenvoudig alle "vlees" -knopen in het document. De NextSibling-methode retourneert het volgende kind van de ouder van een knooppunt.
Dat is het. Zorg ervoor dat u de volledige bron downloadt. En voel je natuurlijk vrij en aangemoedigd om eventuele opmerkingen bij dit artikel op ons Delphi Programming Forum te plaatsen.