TGridColumnCompareEvent = function (const L,R: String; CaseInsensitive: Boolean; LocaleInsensitive: Boolean): Integer of object