Bonjour

j'ai un StringGrid avec plus de 7000 lignes, quelle est la meilleure méthode pour effectuer un tri en se basant sur la colonne 1 ?

Quelqu'un a-t-il déja utilisé la méthode de tri pivot sur un StringGrid ?

Voici le code que j'utilise mais c'est très très lent...
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
17
18
19
Var i,j:Integer;
S:String;
 
  Begin
  With StringGrid1 Do
  Begin
  For i:=1 to RowCount-1 Do
  For j:=i+1 To RowCount-1 Do
  begin
 if AnsiCompareText(Cells[0, i], Cells[0, j]) > 0 then   
  Begin
  S := StringGrid1.Rows[i].Text;
  Rows[i].Text := Rows[j].Text;
  Rows[j].Text := S;
  End;
  end;
  End;
  showmessage('terminé...');
  End;