学习官方示例 - System.Frac: 返回小数部分
生活随笔
收集整理的這篇文章主要介紹了
学习官方示例 - System.Frac: 返回小数部分
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
為什么80%的碼農都做不了架構師？>>> ??
unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)Button1: TButton;procedure Button1Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject); varx,y: Real; beginx := Frac(456.123);y := Frac(-456.123);ShowMessage(FloatToStr(x)); {返回：0.123}ShowMessage(FloatToStr(y)); {返回：-0.123} end;end.轉載于:https://my.oschina.net/hermer/blog/320005
總結
以上是生活随笔為你收集整理的学习官方示例 - System.Frac: 返回小数部分的全部內容，希望文章能夠幫你解決所遇到的問題。
- 上一篇： pdo 连接数据库 报错 could n
- 下一篇： Delphi 的运算符重载(1)