mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-30 16:42:48 +02:00
debugger: fix for launching apps with spaces in their path by Marc Weustink
git-svn-id: trunk@23483 -
This commit is contained in:
parent
f576f9dac8
commit
dc4551665f
@ -113,7 +113,7 @@ begin
|
|||||||
|
|
||||||
FProcess := TDBGProcess.Create(nil);
|
FProcess := TDBGProcess.Create(nil);
|
||||||
try
|
try
|
||||||
FProcess.CommandLine := UTF8ToSys(FileName + ' ' + Arguments);
|
FProcess.CommandLine := UTF8ToSys('"'+FileName + '" ' + Arguments);
|
||||||
FProcess.CurrentDirectory := UTF8ToSys(WorkingDir);
|
FProcess.CurrentDirectory := UTF8ToSys(WorkingDir);
|
||||||
FProcess.Environment.Assign(Environment);
|
FProcess.Environment.Assign(Environment);
|
||||||
if ShowConsole
|
if ShowConsole
|
||||||
|
Loading…
Reference in New Issue
Block a user