diff --git a/components/codetools/finddeclarationtool.pas b/components/codetools/finddeclarationtool.pas
index 9b27d6576d..404d2116ce 100644
--- a/components/codetools/finddeclarationtool.pas
+++ b/components/codetools/finddeclarationtool.pas
@@ -2920,7 +2920,7 @@ begin
     if CurPos.StartPos>CleanPos then break;
     if CurPos.Flag=cafSemicolon then break;
     ReadNextUsedUnit(UnitNamePos,UnitInFilePos);
-    if CleanPos<CurPos.StartPos then begin
+    if CleanPos<=CurPos.StartPos then begin
       // cursor is on an used unit -> try to locate it
       MoveCursorToCleanPos(UnitNamePos.StartPos);
       ReadNextAtom;