NaturalCompareText

function NaturalCompareText(

  const S1: string;

  const S2: string

):Integer;

function NaturalCompareText(

  const Str1: string;

  const Str2: string;

  const ADecSeparator: Char;

  const AThousandSeparator: Char

):Integer;