Salut Sergio,

Effectivement en passant par un TStringlist comme ceci:



function compare(List: TStringList; Index1, Index2: Integer): Integer;
var
n1, n2: integer;
begin