Discussion :

[Himawarii]

Bonjour !

Je suis en terminale S et en option ISN (Informatique et Sciences du Numérique), nous apprenons à manipuler Delphi. Je faisait donc des recherches sur les flux RSS et sur tombé sur cet article ma foi très intéressant ! J'ai téléchargé le code qu'ils proposent, le test et miracle : il marche ! Il affiche bien les derniers articles des blogs, sites... Mais maintenant que j'ai vu qu'il fonctionne, j'aimerais bien le comprendre, savoir comment il marche, quel est le rôle de chaque instruction. Malheureusement, il y a certaines choses que je ne comprend pas et je voulais donc vous demander votre aide pour, s'il vous plaît, commenter le code (vous pouvez directement commenter le code en ligne).

Merci d'avance pour ceux qui voudront bien m'aider !

[Paul TOTH]

tu apprends quoi exactement sur Delphi ? car dans ces 80 lignes de code, il n'y a rien de particulier si ce n'est l'usage de deux quelques objets spécifiques.

[Himawarii]

tu apprends quoi exactement sur Delphi ?

Bah, rien de tellement poussé ; en 3 mois (de 2h/semaine) on a vu les bases : variables, les principaux objets, les boucles, les conditions....ce genre de choses ^^
C'est pour ça que je voulais savoir si on pouvait me commenter quelques lignes, les plus importantes au moins (du genre // cette fonction fait telle chose avec telle variable ou //si telle condition n'est pas remplie, telle variable prend telle valeur)

[Andnotor]

Ce code est... très mauvais !

• Il fonctionnera sans doute sous XP mais a toutes les chances de planter sous Vista+ si l'application se trouve dans un répertoire protégé. Il faudrait s'assurer de télécharger ce fichier temporaire... dans le répertoire temporaire (et cela n'a rien à voir avec Delphi).
• Dans DownloadURLFile, le bloc finally est inutile puisque l'éventuelle exception est gérée avant.
• IncludeTrailingPathDelimiter est inutile, ExtractFilePath conserve le dernier "\".
• ExecuteTarget semble générer une exception qui est interceptée pour renvoyer un booléen. Ce booléen est alors utilisé pour générer... une exception ! Totalement illogique. Autant renvoyer le message original plutôt qu'en inventer un (l'erreur pouvant aussi être un manque de ressource ou de droits en écriture sur le répertoire local).
• Les deux Screen.Cursor:=crDefault sont inutiles puisque le curseur est de toute façon réinitialisé à la fin de la procédure.
• Un Exit après un Raise ne sera jamais exécuté.
• Sans parler de toutes ces variables inutiles (ex. StartItemNode) qui ne font qu'alourdir le code sans autre intérêt.

Bref, il y a encore certainement des notions que tu n'as pas vu (gestion des exceptions) mais commenter ce code en l'état n'a pas grand intérêt

[Himawarii]

Ah...je vois
Penses-tu qu'il serait possible de commenter une amélioration de ce code, enfin je veux dire, que je puisse comprendre un version dans laquelle seraient virés tous les trucs inutiles, de manière à ce qu'il soit propre et apte aux méthodes actuelles ? C'est vraiment dommage, je me faisait une joie de comprendre avec Delphi comment fonctionnaient les lecteurs RSS

[Paul TOTH]

Ah...je vois
Penses-tu qu'il serait possible de commenter une amélioration de ce code, enfin je veux dire, que je puisse comprendre un version dans laquelle seraient virés tous les trucs inutiles, de manière à ce qu'il soit propre et apte aux méthodes actuelles ? C'est vraiment dommage, je me faisait une joie de comprendre avec Delphi comment fonctionnaient les lecteurs RSS

un lecteur RSS se contente de lire un fichier XML, ça n'a pas grand chose à voir avec Delphi en particulier.

le code exemple utilise un composant pour télécharger un fichier et un autre pour lire le XML, il n'y a rien à comprendre là dedans.

la seule chose réellement en rapport avec Dephi c'est l'usage d'un TreeView, mais ce qui n'est qu'une façon de présenter un flux RSS

XML en Delphi