{$ifdef WIN64}
  val := ReadInteger(_Data, _data_Value, 0)); // лишняя скобочка
  {$else}
  val := Round(ReadReal(_Data, _data_Value, 0));
  {$endif}