diff --git a/debugger/gdbmidebugger.pp b/debugger/gdbmidebugger.pp
index 5753132a03..d8401885f8 100644
--- a/debugger/gdbmidebugger.pp
+++ b/debugger/gdbmidebugger.pp
@@ -1071,7 +1071,7 @@ function TGDBMIDebugger.GDBEvaluate(const AExpression: String;
     for n := 1 to Length(AString) do
     begin
       case AString[n] of
-        ' '..#127: begin
+        ' '..#127, #128..#255: begin
           if not InString
           then begin
             InString := True;