fixed identifier completion in with variables

git-svn-id: trunk@7525 -
This commit is contained in:
mattias 2005-08-18 08:12:54 +00:00
parent 6991d94081
commit 6516ac7baa
2 changed files with 8 additions and 6 deletions

View File

@ -873,6 +873,8 @@ begin
{$ENDIF}
GatherContext:=CreateFindContext(Self,CursorNode);
ContextExprStartPos:=GetContextExprStartPos(IdentStartPos,CursorNode);
if GatherContext.Node.Desc=ctnWithVariable then
GatherContext.Node:=GatherContext.Node.Parent;
{$IFDEF CTDEBUG}
DebugLn('TIdentCompletionTool.GatherIdentifiers C',

View File

@ -13,9 +13,9 @@ implementation
procedure Register;
begin
RegisterUnit('tableeditorform',@tableeditorform.Register);
RegisterUnit('tableeditorform', @tableeditorform.Register);
end;
initialization
RegisterPackage('sqlitedslaz',@Register);
RegisterPackage('sqlitedslaz', @Register);
end.