Commit ada36645dee89b22ddfc3a3b611d55026b0d7bbe
1 parent
a91edf1c
Exists in
master
- merge de branch (2.4) agente-windows
revisão [log:cacic/branches/2.4@757:788 "[757:788]"] git-svn-id: http://svn.softwarepublico.gov.br/svn/cacic/cacic/trunk/agente-windows@791 fecfc0c7-e812-0410-ae72-849f08638ee7
Showing
1 changed file
with
9 additions
and
1 deletions
Show diff stats
CACIC_Library.pas
| @@ -181,6 +181,14 @@ const | @@ -181,6 +181,14 @@ const | ||
| 181 | const | 181 | const |
| 182 | CACIC_DATFILENAME = 'cacic2.dat'; | 182 | CACIC_DATFILENAME = 'cacic2.dat'; |
| 183 | 183 | ||
| 184 | + | ||
| 185 | +{ | ||
| 186 | + Controle de prioridade de processo | ||
| 187 | + http://msdn.microsoft.com/en-us/library/ms683211(VS.85).aspx | ||
| 188 | +} | ||
| 189 | +const BELOW_NORMAL_PRIORITY_CLASS = $00004000; | ||
| 190 | + {$EXTERNALSYM BELOW_NORMAL_PRIORITY_CLASS} | ||
| 191 | + | ||
| 184 | var | 192 | var |
| 185 | P_OSVersionInfo: POSVersionInfo; | 193 | P_OSVersionInfo: POSVersionInfo; |
| 186 | 194 | ||
| @@ -652,7 +660,7 @@ begin | @@ -652,7 +660,7 @@ begin | ||
| 652 | nil, | 660 | nil, |
| 653 | false, | 661 | false, |
| 654 | CREATE_NEW_CONSOLE or | 662 | CREATE_NEW_CONSOLE or |
| 655 | - NORMAL_PRIORITY_CLASS, | 663 | + BELOW_NORMAL_PRIORITY_CLASS, |
| 656 | nil, | 664 | nil, |
| 657 | nil, | 665 | nil, |
| 658 | SUInfo, | 666 | SUInfo, |