掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
小数の比較をするには？ (ID：38931)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になっております。 XP,Delphi2007です。 小数の比較をしようとしましたが、思うとおりになりません。 下に例を書きましたが、R:realに2.1を代入し、r=2.1かどうか比較すると、falseという結果が返ってきます。 なぜでしょうか？ rの値を適当にいろんな小数に変更しても、falseです。 rの値を整数にすると、trueになります。 （123.0のときはtrue、123.1のときはfalse） 小数の比較をして、同じ値のときにtrueになるためには、どうしたらよいのでしょうか。 よろしくお願いします。 ------------------------------------------------------- ※Button1を置く。 procedure TForm1.Button1Click(Sender: TObject); var r:real; begin r:=2.1; if r=2.1 then begin button1.caption:='true'; end else begin button1.caption:='false'; end end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.