Funciona perfectamente, pero hay que cambiar:
List.CustomSort(CompareNumbers);
por
List.CustomSort(@CompareNumbers);
Muestra (Delphi 7) el aviso de código inseguro al compilar: pero no vamos a pasarlo a .NET.
Saludos.
P.D.: Para los despitados como yo una nota: TListBox.Sorted:= False;
|