CodeTools: Prevented a pop-up after typing a period in a string constant. Issue #19663, patch from Bart Broersma

git-svn-id: trunk@31882 -
This commit is contained in:
juha 2011-08-05 18:51:43 +00:00
parent 17251f4aa9
commit 6fbe0a47b5

View File

@ -8930,7 +8930,7 @@ procedure TSourceEditorManager.OnSourceCompletionTimer(Sender: TObject);
// check if in a string constant
p:=1;
InStringConstant:=false;
while (p<=LogCaret.X) and (p<=length(Line)) do begin
while (p<LogCaret.X) and (p<=length(Line)) do begin
if Line[p]='''' then
InStringConstant:=not InStringConstant;
inc(p);