Download as
Browse Code »

Commit 0baee07a4a5f8f380825c6bbe4f8786f3b15a37b

Authored by Adriano Vieira
1 parent 4c1d5efd
Exists in master

- corrige CACIC_Library com valor padrão para método de execução de processos. 

git-svn-id: http://svn.softwarepublico.gov.br/svn/cacic/cacic/trunk/agente-windows@818 fecfc0c7-e812-0410-ae72-849f08638ee7
Showing 1 changed file with 13 additions and 3 deletions   Show diff stats
CACIC_Library.pas
  Diff comments   View file @0baee07
... ... @@ -102,7 +102,7 @@ type
102 102 function getWinDir() : string;
103 103 function getHomeDrive() : string;
104 104 function isWindowsAdmin() : boolean;
105   - function createSampleProcess(p_cmd: string; p_wait: boolean; p_showWindow : word): boolean;
  105 + function createSampleProcess(p_cmd: string; p_wait: boolean; p_showWindow : word = SW_HIDE): boolean;
106 106 procedure showTrayIcon(p_visible:boolean);
107 107 end;
108 108  
... ... @@ -641,12 +641,22 @@ end;
641 641 Executa commandos, substitui o WinExec
642 642  
643 643 @autor: Marcos Dell Antonio
644   - @adaptações: Anderson Peterle
  644 + @param p_cmd Comando a ser executado
  645 + @param p_wait TRUE se deve aguardar término da excução, FALSE caso contrário
  646 +-------------------------------------------------------------------------------}
  647 +{function TCACIC_Windows.createSampleProcess(p_cmd: string; p_wait: boolean ): boolean;
  648 +begin
  649 +end;
  650 +}
  651 +{*------------------------------------------------------------------------------
  652 + Executa commandos, substitui o WinExec
  653 +
  654 + @autor: Marcos Dell Antonio
645 655 @param p_cmd Comando a ser executado
646 656 @param p_wait TRUE se deve aguardar término da excução, FALSE caso contrário
647 657 @param p_showWindow Constante que define o tipo de exibição da janela do aplicativo
648 658 -------------------------------------------------------------------------------}
649   -function TCACIC_Windows.createSampleProcess(p_cmd: string; p_wait: boolean; p_showWindow : word): boolean;
  659 +function TCACIC_Windows.createSampleProcess(p_cmd: string; p_wait: boolean; p_showWindow : word = SW_HIDE): boolean;
650 660 var
651 661 SUInfo: TStartupInfo;
652 662 ProcInfo: TProcessInformation;
... ...