名前 題名 ▼ Syakeさん > ▼ Mr.XRAYさん > > > > > {税計算 1円未満切捨て} > > > Cells[10,RowCount-1] := StrToComma(IntToStr(Trunc(Price * TAX_RATE))); > > > > これ何かマズイんすか? > > > ちなみに > A) > MessageBox(IntToStr(Trunc(42000* 1.05)),{略}); > の場合と > B) > var > Dub:Double; > {−−−−−} > Dub:=42000* 1.05; > MessageBox(IntToStr(Trunc(Dub)),{略}); > の場合で > > A)44099 > B)44100 > > てな感じで結果は異なります。 > 直接使用する場合は多分内部的にSingle扱いなのでしょうか。 > D2007の場合ですが他の環境ではどうかは不明です。 > GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link