소스 검색

* fix compilation after r39568 as Min() requires the Math unit

git-svn-id: trunk@39571 -
svenbarth 7 년 전
부모
커밋
7e0d7e118e
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      packages/fcl-process/src/process.pp

+ 2 - 1
packages/fcl-process/src/process.pp

@@ -18,7 +18,8 @@ interface
 
 Uses Classes,
      pipes,
-     SysUtils;
+     SysUtils,
+     Math;
 
 Type
   TProcessOption = (poRunSuspended,poWaitOnExit,