Trunc関数について (ID:40382)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 下記のようなに実際に使っています Edit1.Text := 5; Edit2.Text := 1; Edit3.Text := 1; Edit4.Text := 1; Edit5.Text := 1; Edit6.Text := 1; この場合は、Edit7.Text := 0; Edit1.Text := 1; Edit2.Text := 1; Edit3.Text := 1; Edit4.Text := 1; Edit5.Text := 1; Edit6.Text := 5; この場合は、Edit7.Text := 1; いったいどういう事なんでしょうか？ [検証ソース] var i: Real; begin i := StrToInt(Edit1.Text) * 0.1; i := i + StrToInt(Edit2.Text) * 0.1; i := i + StrToInt(Edit3.Text) * 0.1; i := i + StrToInt(Edit4.Text) * 0.1; i := i + StrToInt(Edit5.Text) * 0.1; i := i + StrToInt(Edit6.Text) * 0.1; Edit7.Text := IntToStr(Trunc(i));