Bonjour.

J'ai une liste simplement chaînée de plusieurs points, un point étant défini par une abscisse x, une ordonnée y et nom Z.
J'ai créé ma liste, et je souhaite récupérer le Nieme point designé par un entier.

Voici ce que j'ai écrit :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
FUNCTION niemePoint (n : integer ; p : t_polygone) : t_point;
var
     i:integer    ;
     c1:t_cellule;
     begin
     i:=0;
     c1:= p.tete^;
     repeat
     c1:=p.cellule.suivant^;
     i:=i+1;
     until (i=n);
      niemepoint:=c1.item;
 
 
     end;
N'étant pas tres à l'aise avec les listes, je ne doute pas qu'il y a une erreur.

Merci d'avance.