MsgStrVal

procedure MsgStrVal(

  const Text: string;

  const x: Int64;

  TextSuffix: string = ' = '

); overload;

procedure MsgStrVal(

  const Text: string;

  const x: Extended;

  TextSuffix: string = ' = ';

  FormatStr: string = '0.0000'

); overload;