Bonjour

J'ai déclaré ce nouveau type pour extraire les mots un fichier texte leurs positions le problème c'est le tri
comment je peux les triés

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
  type
  TListDesMots = record
    LeMot : string;
    Sapos : cardinal;
  end;
 
Var
 ListDesMots:array[0..131071]of TListDesMots ;
j'ai cette fonction
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
       SortArray(ListDesMots, 0, SizeOf(ListDesMots[Low(ListDesMots)]),
  0,wcunt-1  , ComparePersons);
mais lorsque il s'agi de 80000 mots elle devient un peu lente et il y a ce message "Stack Overflow..."