為什么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: 返回小数部分的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。