diff --git a/Source/SimpleParser/SimpleParser.Lexer.pas b/Source/SimpleParser/SimpleParser.Lexer.pas
index 585f2e5..52326a4 100644
--- a/Source/SimpleParser/SimpleParser.Lexer.pas
+++ b/Source/SimpleParser/SimpleParser.Lexer.pas
@@ -2365,8 +2365,8 @@ procedure TmwBasePasLex.StringProc;
         else
           if NewLine and (FBuffer.Buf[FBuffer.Run] <> #9) and (FBuffer.Buf[FBuffer.Run] <> #32) then
             NewLine := False;
+          Inc(FBuffer.Run);
       end;
-      Inc(FBuffer.Run);
     until False;
   end
   else