Cita:
Empezado por Neftali
(0) Desactivar el orden del ListBox.
(1) Copias todos los números al TSttingList pero formateandolos como cadenas con ceros a la izquierda; 00001, 00023, 00167,...
(2) Mandas ordenar ese StringList, que en este caso los ordena como cadenas, pero con la ordenación numérica correcta.
(3) Un for que los vuelve a copiar al ListBox convirtiéndolos a números.
|
Neftali, puedes ahorrar unos pasos si usas el método CustomSort de TStringList. A este método le pasas como parámetro una función que compara dos valores. De esta manera te evitas el rellenar con ceros.
// Saludos