Fix bug #1850358 Table name autocomplete shows "dummy node"

This commit is contained in:
Ansgar Becker
2007-12-14 18:41:46 +00:00
parent 249610072e
commit 2e859faf5e

View File

@@ -3275,12 +3275,16 @@ begin
tn := DBTree.Items[i];
if tn.Text = SynCompletionProposal1.PreviousToken then
begin
// Ensure the db-node has its tables fetched
PopulateTreeTableList(tn);
child := tn.getFirstChild;
for j:=0 to tn.Count-1 do
begin
addTable(child.Text);
child := tn.getNextChild(child);
end;
// We have found the matching node, no need to look further
Break;
end;
end;
Screen.Cursor := crDefault;