Ordenar TStringList con objetos

[ecfisa]

Hola.

El método CustomSort ordena el TStringList mediante una función de comparación personalizada cuyo puntero recibe como argumento.
Esta, deberá comparar dos elementos de la lista y devolver un número que será:

• Negativo si el primer elemento es menor que el segundo.
• Cero si ambos elementos sin iguales.
• Positivo si el primer elemento es mayor que el segundo.

En el ejemplo, el método CustomSort asume this como el parámetro TS, mientras que 0 y TS->Count como los sucesivos índices de la lista.

Para ordenar de forma ascendente dispones del método Sort de forma directa, pero también puedes usar CustomSort del siguiente modo:

Código PHP:

int __fastcall SortCompare( TStringList* TS, int i1, int i2 )
{
   return TS->Strings[i1].AnsiCompare(TS->Strings[i2]); 


Prueba el ejemplo para verificar.


Saludos

[Angel.Matilla]

Perfecto. Cuando lo probé ayer, antes de escribir el mensaje, me estaba dando un error de compilación y era porque había declarado mal esa función SortCompare. Muchísimas gracias.