Source position: strutils.pp line 147
function SoundexInt(
const AText: string;
ALength: TSoundexIntLength
):Integer;function SoundexInt(
const AText: string
):Integer;