掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
浮動小数点の扱いについて (ID：47091)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
http://mrxray.on.coocan.jp/Delphi/Others/008.htm#02 をふまえて． またまた，僭越ですが，質問された方の代わりにまとさせていただきます． 質問の文章には，Delphi, Windows のバージョンの記載がありませんので，これまた勝手に． (1) Windows 7 の電卓を起動して，関数電卓にする (2) -3.9223669552E+06 をコピーして電卓に貼り付ける (3) 電卓の = キーを押すと，2.0776330448 という値になる そこで質問です．このように，-3.9223669552E+06 という値から，電卓と同じ値を計算するには， Delphi XE ではどのようにすればいいのでしょうか ? 回答例 例えば以下のようにするとできます． uses に Math が必要です． procedure TForm1.Button1Click(Sender: TObject); var LValue : Double; LManti : Extended; LExtend : Integer; begin LValue := -3.9223669552E+06; LExtend := Math.Floor(Log10(Abs(LValue))); LManti := LValue / Math.IntPower(10, LExtend); LValue := LManti + LExtend; ShowMessage(FloatToStr(LValue)); //2.0776330448になる end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.