안녕하십니까? 땅울음입니다.
혹시 델파이2.0에서 절상 함수가 있나 물어보려 합니다.
도움말을 찾아보아도 보이지않고 함수를 만들려 해도 정확이 작동 하지 않습니다.
제가 만든 함수는
Function  MyCeil(fVal: Double): Integer;
var
   iVal: Integer;
begin
   iVal := Trunc(fVal);
   if (fVal-iVal) > 0  then
      iVal := iVal + 1;
   Result := iVal;
end;
인데 예를 들어 fVal이 110.0 일때 fVal-iVal에서 0이아닌 1.4210e-14와같이
쓸모없는 값을 반환합니다.
해결방법이 없을까요?

끝까지 읽어주셔서 감사합니다.