Source position: convutil.inc line 86
function StrToConvUnit(
AText: string;
out AType: TConvType
):Double;