Ordenar Listview por columna

[roman]

Utiliza el método AlphaSort y el evento OnCompare.

Si buscas en la ayuda de Delphi acerca del evento OnCompare verás un ejemplo que hace exactamente lo que quieres.

// Saludos

[[Gunman]]

Vaya... Yo también iba a hacer esta pregunta...
Román, he visto el ejemplo de la ayuda de Delphi, pero no me ha solucionado nada... este es mi código, hago clic en las columnas pero nada...

Código Delphi [-]
procedure TMainFRM.ExplorerListColumnClick(Sender: TObject;
  Column: TListColumn);
begin
  ColumnToSort := Column.Index;
  (Sender as TCustomListView).AlphaSort;
end;

procedure TMainFRM.ExplorerListCompare(Sender: TObject; Item1,
  Item2: TListItem; Data: Integer; var Compare: Integer);
var
  i: Integer;
begin
  if ColumnToSort = 0 then
    Compare := CompareText(Item1.Caption,Item2.Caption)
  else begin
   i := ColumnToSort - 1;
   Compare := CompareText(Item1.SubItems[i],Item2.SubItems[i]);
  end;

[roman]

Pues lo acabo de probar y funciona bien. No estarás dando click en cualquier parte de la columna ¿verdad? Debe ser en el título.

// Saludos

[[Gunman]]

Claro, claro, en el título.
El SortType tiene que estar de alguna determinada forma? Tiene algo que ver que mi ListView sea un Virtual List View (es decir, tiene la propiedad OwnerData en True)?

[roman]

Empezado por [Gunman]

Tiene algo que ver que mi ListView sea un Virtual List View

Pues sí, creo que tiene todo que ver. No creo que sea posible usar el método en modo virtual. Si lo piensas tantito te sonará lógico. En modo virtual, el ListView no dispone de todos los datos, sólo de los que en un momento dado debe presentar. Pero para ordenar tendría que tener todos los datos.

// Saludos

[[Gunman]]

Hay que jorobarse... Entonces como los puedo ordenar? Si se puede...

[roman]

Supongo que dependerá de cómo estés alimentando al ListView. Posiblemente haya que ordenar la fuente. Por ejemplo, si los datos los tmas de una base de datos, podrías cambiar el índice activo o reordenar cambiando el ORDER BY de la consulta SQL. De cualquier forma, toma en cuenta que la ordenación requiere todos los datos, con lo que se pierde en ese momento la ventaja del modo virtual.

// Saludos