フリーソフト

« [BCB] 世界協定時刻(UTC)を取得する | トップページ | [BCB] TSystemTime(_SYSTEMTIME)とTDateTimeの変換 »

[Delphi] 実数を整数部分と小数部分に分ける

Frac関数、およびInt関数を使用します。

uses System,Math;

var
 J:Extended;
 I:Integer;
 S:Extended;
begin
 J:=1.23;

 I:=Int(J); //整数部分 1
 S:=Frac(J); //小数部分 0.23
end;

« [BCB] 世界協定時刻(UTC)を取得する | トップページ | [BCB] TSystemTime(_SYSTEMTIME)とTDateTimeの変換 »

Delphi」カテゴリの記事

C++言語・Pascal言語」カテゴリの記事

コメント

この記事へのコメントは終了しました。