掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
数の割り算で「nnn.999・・・」を「nnn」にするには？ (ID:17152)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
BCD(2進化10進数)はデータベースの項目値，またDelphi6以上でしたら， FMTBcdユニットを使用すれば可能です． [例] // usesにFMTBcdが必要 procedure TForm1.Button1Click(Sender: TObject); var A,B,C: TBCD; begin A:=DoubleToBcd(84.3); B:=DoubleToBcd(80.4); BcdSubtract(A,B,C); ShowMessage(BCDToStr(C)); end; >元の数を 1000 倍し、小数部をなくし、整数演算してもだめでしょうか？ 結果が整数である保証があればですね．
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.