bonjour.
actuellement je rempli une liste (à partir d'une liste chaînée) au clique sur un bouton.
je souhaiterais pouvoir le faire mais mettre cela en procédure pour pouvoir mettre à jour facilement, si possible même à partir de ma deuxième unité.
j'ai essayé pas mal de chose mais le problème est qu'il ne reconnait pas ma liste.
je suis contient du fait qu'il faille lui donner la tête de liste mais le problème qui me bloque est la reconnaissance de la liste.
voila le code d'origine:
Merci de votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 procedure TForm1.btn_afficherClick(Sender: TObject); begin p:=tete; List_contenu.Clear; while p<>nil do // tant que l'on est pas à la fin begin List_contenu.Items.Add(p^.nom + ' | ' + p^.description + ' | ' + p^.dispo); p:=p^.suivant; end end;
Partager