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
