Source position: _crw_sort.pas line 48
type TCompareFunction = function(
Data: Pointer;
Key1: Pointer;
Key2: Pointer
):Integer;