Source position: tiUtils.pas line 304
function tiDecimalRoundSgl(
AValue: single;
ANDFD: Integer;
ACtrl: TtiDecimalRoundingCtrl = drHalfUp
):Extended;