diff options
| author | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2021-03-20 21:45:19 +0000 |
|---|---|---|
| committer | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2021-03-20 21:45:19 +0000 |
| commit | 37f61c1e107daabfc23283a757538f456fb588fb (patch) | |
| tree | 86c37569fa63107031e7511aa950d41375424be3 /packages/fcl-process | |
| parent | 0f737d9d13b088cb1f8114369a6c5d5e0ecf66e9 (diff) | |
| download | fpc-37f61c1e107daabfc23283a757538f456fb588fb.tar.gz | |
* also assign threadid. mantis 38645
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@49021 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fcl-process')
| -rw-r--r-- | packages/fcl-process/src/win/process.inc | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/packages/fcl-process/src/win/process.inc b/packages/fcl-process/src/win/process.inc index 7c690060d8..03e512e8c4 100644 --- a/packages/fcl-process/src/win/process.inc +++ b/packages/fcl-process/src/win/process.inc @@ -285,6 +285,7 @@ Var Raise EProcess.CreateFmt(SErrCannotExecute,[FCommandLine,GetLastError]); FProcessHandle:=FProcessInformation.hProcess; FThreadHandle:=FProcessInformation.hThread; + FThreadId:=FProcessInformation.dwThreadId; FProcessID:=FProcessINformation.dwProcessID; Finally if POUsePipes in Options then |