而我,因為臨時要畫出跨部門的文件流程,使用這套工具畫了一個簡單的循序圖:
![]() |
| 跨部門的請採購流程 |
![]() |
| 跨部門的請採購流程 |
1 2 3 4 5 6 7 8 9 10 11 12 | uses Math; function RoundA(A_Float: Extended): Integer; overload; begin Result := Trunc(Math.SimpleRoundTo(A_Float, 0)); // 取整數部分即可 end; function RoundA(A_Float: Extended; A_Digit: Integer=-2): Extended; overload; begin Result := Math.SimpleRoundTo(A_Float, A_Digit); end; |