Pues ya he visto tu programa, pero no creo que haya mucho que agregar, lo que yo quise fue hacer click en las columnas para ordenar las mismas, no lo tienes, pero en
Torry's encontré como hacerlo, solo modifique una parte para que funcionara para todas las columnas.
esta es la modificación
Código Delphi
[-]
if Column.Index = 0 then
LvSortStyle := cssAlphaNum
else
LvSortStyle := cssNumeric;
case Column.Index of
0,1,3,5,7 : LvSortStyle := cssAlphaNum;
else LvSortStyle := cssNumeric;
end;
Saludos.