codetools: on variable only valid in the on block, bug #24494

git-svn-id: trunk@41842 -
This commit is contained in:
mattias 2013-06-23 17:32:52 +00:00
parent 421997613d
commit 7201e34ba9

View File

@ -3233,6 +3233,9 @@ var
will be searched:
with ContextNode, StartContextNode do ;
}
end else if ContextNode.Desc=ctnOnBlock then begin
// the ctnOnIdentifier is only valid within the ctnOnStatement
// => skip
end else begin
break;
end;