Get path to cmd.exe via COMSPEC environment variable. See http://www.heidisql.com/forum.php?t=15206

This commit is contained in:
Ansgar Becker
2014-03-23 15:37:04 +00:00
parent 5a55329844
commit 5e876bca62

View File

@ -1129,7 +1129,7 @@ begin
FillChar(FPlinkProcInfo, SizeOf(TProcessInformation), 0);
FillChar(StartupInfo, SizeOf(TStartupInfo), 0);
StartupInfo.cb := SizeOf(TStartupInfo);
if CreateProcess(PChar('C:\Windows\System32\cmd.exe'), PChar(PlinkCmd), nil, nil, false,
if CreateProcess(PChar(GetEnvironmentVariable('COMSPEC')), PChar(PlinkCmd), nil, nil, false,
CREATE_DEFAULT_ERROR_MODE + NORMAL_PRIORITY_CLASS + CREATE_NO_WINDOW,
nil, nil, StartupInfo, FPlinkProcInfo) then begin
WaitForSingleObject(FPlinkProcInfo.hProcess, FParameters.SSHTimeout*1000);