From ada36645dee89b22ddfc3a3b611d55026b0d7bbe Mon Sep 17 00:00:00 2001
From: harpiain@gmail.com <harpiain@gmail.com>
Date: Wed, 22 Apr 2009 23:36:20 +0000
Subject: [PATCH] - merge de branch (2.4) agente-windows   revisão [log:cacic/branches/2.4@757:788 "[757:788]"]

---
 CACIC_Library.pas | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/CACIC_Library.pas b/CACIC_Library.pas
index c0bff96..8146990 100644
--- a/CACIC_Library.pas
+++ b/CACIC_Library.pas
@@ -181,6 +181,14 @@ const
 const
   CACIC_DATFILENAME    = 'cacic2.dat';
 
+
+{
+ Controle de prioridade de processo
+ http://msdn.microsoft.com/en-us/library/ms683211(VS.85).aspx
+}
+const BELOW_NORMAL_PRIORITY_CLASS = $00004000;
+  {$EXTERNALSYM BELOW_NORMAL_PRIORITY_CLASS}
+
 var
   P_OSVersionInfo: POSVersionInfo;
 
@@ -652,7 +660,7 @@ begin
                           nil,
                           false,
                           CREATE_NEW_CONSOLE or
-                          NORMAL_PRIORITY_CLASS,
+                          BELOW_NORMAL_PRIORITY_CLASS,
                           nil,
                           nil,
                           SUInfo,
--
libgit2 0.21.2