[DELPHI] TShellListView e ordinamento in base a una colonna

[PdhMonty]

buongiorno,
non riesco a 'ordinare' le colonne di una ShellListView con delphi
in modo da visualizzare l'elenco di file in ordine di data modifica
Nelle propriet� del componente ho settato a VsReport il ViewStyle
e a true il Sorted.
Creo l'evento 'onColumnsClick' nel quale cerco di usare

var ColumnToSort: Integer;
procedureTForm1.ListView1ColumnClick(Sender:TObject;Column:TListColumn);
begin
  ColumnToSort := Column.Index;
  (Sender as TShellListView).AlphaSort; 
end;

anche se credo che questo codice si riferisca al componente TListView
ma non sortisce effetto...

...dove sbaglio ??