diff --git a/components/codetools/pascalreadertool.pas b/components/codetools/pascalreadertool.pas
index 34ce17a05c..89fe6e2b27 100644
--- a/components/codetools/pascalreadertool.pas
+++ b/components/codetools/pascalreadertool.pas
@@ -284,8 +284,9 @@ begin
                 // codetools skip comment
                 inc(CurCommentPos);
                 while (CurCommentPos<CommentEnd) do begin
-                  if (Src[CurCommentPos]=#3) and (CurCommentPos+1<CommentEnd)
-                  and (Src[CurCommentPos]='}') then begin
+                  if (Src[CurCommentPos]=#3)
+                  and (CurCommentPos+1<CommentEnd) and (Src[CurCommentPos+1]='}')
+                  then begin
                     inc(CurCommentPos,2);
                     break;
                   end;