From dd3feb148b1d1f8c72f3d175e9de30de4694c441 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 22 Jun 2013 08:08:24 +0000
Subject: [PATCH] IDE: changed processdebugger to TProcessUTF8

git-svn-id: trunk@41786 -
---
 debugger/processdebugger.pp | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/debugger/processdebugger.pp b/debugger/processdebugger.pp
index 22efdbc63b..e4614486ad 100644
--- a/debugger/processdebugger.pp
+++ b/debugger/processdebugger.pp
@@ -38,7 +38,7 @@ unit ProcessDebugger;
 interface
 
 uses
-  Classes, SysUtils, FileUtil, Process, Debugger, LCLProc,
+  Classes, SysUtils, FileUtil, UTF8Process, Process, Debugger, LCLProc,
   BaseDebugManager, Dialogs, ProcessList;
 
 type
@@ -68,7 +68,7 @@ type
 
   { TDBGProcess }
 
-  TDBGProcess = class(TProcess)
+  TDBGProcess = class(TProcessUTF8)
   private
     FOnDestroy: TNotifyEvent;
   protected
@@ -113,8 +113,8 @@ begin
 
   FProcess := TDBGProcess.Create(nil);
   try
-    FProcess.CommandLine := UTF8ToSys('"'+FileName + '" ' + Arguments);
-    FProcess.CurrentDirectory := UTF8ToSys(WorkingDir);
+    FProcess.CommandLine := '"'+FileName + '" ' + Arguments;
+    FProcess.CurrentDirectory := WorkingDir;
     FProcess.Environment.Assign(Environment);
     if ShowConsole
     then FProcess.Options:= [poNewConsole]