TryStrToBCD

function TryStrToBCD(

  const aValue: FmtBCDStringtype;

  var BCD: tBCD

):Boolean;

function TryStrToBCD(

  const aValue: FmtBCDStringtype;

  var BCD: tBCD;

  const Format: TFormatSettings

):Boolean;