Pour ajouter des éléments dans la liste :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
var
  mylist : Tlist;
  k : Integer;
  renvois : Pointer;
begin
  k := 2;
  myList := TList.Create;
  mylist.Add(Pointer(k));
  renvois := mylist.First;
  ShowMessage(IntToStr(Integer(renvois)));
end;
Mais pour afficher ces éléments j'utilise quel fonction ????????