Différences

Ci-dessous, les différences entre deux révisions de la page.

--- prog:lazarus:classes:tprocess [28/02/2021 19:35]
thierry [Trouver le filename complet d'une commande]
+++ prog:lazarus:classes:tprocess [24/04/2021 13:05] (Version actuelle)
thierry [Sources et Ressources]
@@ Ligne 1: / Ligne 1: @@
 ====== TProcess et TProcessUTF8 ======
-===== Astuces =====
 ===== TProcess =====
@@ Ligne 102: / Ligne 102: @@
 end.
 </code>
+==== Procédure interessantes ====
+=== Terminate ===
+<code delphi>
+Function Terminate (AExitCode : Integer): Boolean; virtual;
+    ...
+Function TProcessnamemacro.Terminate(AExitCode : Integer) : Boolean;
+begin
+  Result:=False;
+  If ExitStatus=Still_active then
+    Result:=TerminateProcess(Handle,AexitCode);
+end;
+</code>
+Appel au final la fonction ''TerminateProcess'' de Windows
+<code delphi>
+function TerminateProcess(hProcess:HANDLE; uExitCode:UINT):WINBOOL; external 'kernel32' name 'TerminateProcess';
+</code>
+D'aprés la [[https://docs.microsoft.com/en-us/windows/win32/api/processthreadsapi/nf-processthreadsapi-terminateprocess|Doc de TerminateProcess dans Windows]] le paramètre ''AExitCode'' est le code de sortie à utiliser par le processus et les threads terminés à la suite de cet appel.
+==== TProcessOptions ====
+=== poRunSuspended ===
+Start the process in suspended state.
+=== poWaitOnExit ===
+Wait for the process to terminate before returning.
+=== poUsePipes ===
+Utilisez les ''pipes'' pour rediriger les entrées et sorties standard.
+Utiliser cette option si l'on veut récupérer le texte généré par l'application.
+=== poStderrToOutPut ===
+Redirect standard error to the standard output stream.
+=== poNoConsole ===
+Ne pas autoriser l'accès à la fenêtre de la console pour le processus (Win32 uniquement).\\
+N'affiche pas la console.
+=== poNewConsole ===
+Start a new console window for the process (Win32 only)
+=== poDefaultErrorMode ===
+Use default error handling.
+=== poNewProcessGroup ===
+Start the process in a new process group (Win32 only)
+=== poDebugProcess ===
+Allow debugging of the process (Win32 only)
+=== poDebugOnlyThisProcess ===
+Do not follow processes started by this process (Win32 only)
+=== poDetached ===
+ToDo !!!
+=== poPassInput ===
+Pass standard input handle on to new process
+=== poRunIdle ===
+ToDo!!!
 ===== TProcessUTF8 =====
@@ Ligne 125: / Ligne 173: @@
 </code>
 ===== TAsyncProcess =====
+  * [[prog:lazarus:classes:tasyncprocess|Page de TAsyncProcess]]
   * [[https://lazarus-ccr.sourceforge.io/docs/lcl/asyncprocess/tasyncprocess.html]]
-===== Sources et Ressources=====
+====== Sources & Ressources======
+  * [[prog:lazarus:cas:processus:processus]] (Page locale)
   * [[https://wiki.freepascal.org/Executing_External_Programs/fr|Executing External Programs/fr]]
+  * [[prog:lazarus:classes:tasyncprocess|Page de TAsyncProcess]]
+  * [[https://lazarus-ccr.sourceforge.io/docs/lcl/asyncprocess/tasyncprocess.html]]
+  * [[https://docs.microsoft.com/en-us/windows/win32/api/processthreadsapi/nf-processthreadsapi-terminateprocess|Doc TerminateProcess @ Windows]]