Linux迎接25歲生日!Delphi也趕來祝賀囉~

Linus Torvalds was the designer of the open-source operating system Linux.
Linus Torvalds was the designer of the open-source operating system Linux.

今年是Linux的25歲生日!Delphi也推出新的版本代號「Godzilla」(哥吉拉),準備讓Delphi 也能在linux上面執行了~
LinuxGodzilla

linux1_large

linux2_large

相關連結:

Happy 25th birthday, Linux

Linux Just Turned 25 and Delphi is Coming to Celebrate

Delphi 四捨五入含小數位數作法

要先 use System.Math; 然後記得輸入的是extended,如果是double的話,小數位數就會有誤差
// MyRound 四捨五入
// input
// amt 金額
// iprecision 小數位數(預設0)
// ouput
// string 文字
Function MyRound(amt:extended ;iPrecision:Integer=0):String;
var
S:String;
i1:Integer;
Begin
S:= ”;
i1:= iPrecision * -1;
S:= FloatToStr(SimpleRoundTo(Amt,i1));
result := s;
End;