삭제를 위한 암호를 넣어 주세요

자답 : FormatFloat('#.####0',value);
이런식으로 자리수를 잘라주면 정상출력 되는군요 ^^
 
2017-01-18 오후 9:13:17

삭제를 위한 암호를 넣어 주세요

부동소숫점 연산에 관한 문제로서 아래 데브기어 기술자료를 참고해 보시면 도움이 될 것 같네요...
http://tech.devgear.co.kr/delphi_news/428237

참고로...
procedure TForm1.Button1Click(Sender: TObject);
 var
   aaa : Double;
   strNum: string;
 begin
   aaa := 1.09657 -  1.08678;
   Str(aaa : 10 : 10, strNum);
   showmessage(strNum);

   aaa := 1.07108 - 1.07099;
   Str(aaa : 10 : 10, strNum);
   showmessage(strNum);
 end;   2017-01-18 오후 9:14 
2017-01-18 오후 9:16:42

삭제를 위한 암호를 넣어 주세요

현상이 아니라 당연한 겁니다 부동소수를 컴퓨터가 어떻게 구현하는지 이해를 먼저하셔야 됩니다. https://ko.wikipedia.org/wiki/IEEE_754 한번 읽어 보세요.

부동소수를 디스플레이할 때에는 정수부와 소수부를 어떻게 표현할지를 컴퓨터에 알려주셔야 합니다. 
2017-01-18 오후 9:28:05

삭제를 위한 암호를 넣어 주세요

저것땜시 고민좀 많이 하긴 했습니다.

불행중 다행히 전 소수점이 4자리까지 필요하지 않아서 타입을 currency로 했습니다.고정소수점연산이므로 소수점 4자리는 에러가 안나더라구요.
단, 정수값도 범위가 훅 작아지는 문제가 있긴합니다만.. 
2017-01-20 오전 10:10:36