[Lazarus] TListView sorting

[Hans-Peter Diettrich]

In an review of the TListView sorting procedure I could fix most 
problems already. Remaining question:

Is it possible to change the parameter lists of:

TWSCustomListView.SetSort(const ALV: TCustomListView; const AType: 
TSortType; const AColumn: Integer);

into

TWSCustomListView.SetSort(const ALV: TCustomListView; SortProc: 
TListSortCompare; const Data: lParam);

There exists no need to pass the sorting parameters, because these are 
accessible in every sort procedure. Instead a custom compare function 
and a custom sort argument should be passed, to allow for Delphi 
compatible custom sorting:
TCustomListView.CustomSort(SortProc; lParam); //types to be fixed

IMO every widgetset will allow to implement above change.

DoDi