Source position: strutils.pp line 159
type TCompareTextProc = function(
const AText: string;
const AOther: string
):Boolean;