paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-26 14:40:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: help selector: selected image index, bug #30303

Browse Source 
git-svn-id: trunk@52570 -
This commit is contained in:
mattias 2016-06-22 21:54:05 +00:00
parent 7175fcd4fc
commit d6489bcc97
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/idehelpmanager.pas
View File

@ -1068,10 +1068,12 @@ begin
begin begin
DBTVNode:=NodesTreeView.Items.AddChild(nil,DB.ID); DBTVNode:=NodesTreeView.Items.AddChild(nil,DB.ID);
DBTVNode.ImageIndex:=FImgIndexDB; DBTVNode.ImageIndex:=FImgIndexDB;
DBTVNode.SelectedIndex:=FImgIndexDB;
end; end;
TVNode:=NodesTreeView.Items.AddChild(DBTVNode,NodeQuery.AsString); TVNode:=NodesTreeView.Items.AddChild(DBTVNode,NodeQuery.AsString);
TVNode.ImageIndex:=FImgIndexNode; TVNode.ImageIndex:=FImgIndexNode;
TVNode.SelectedIndex:=FImgIndexNode;
TVNode.Data:=NodeQuery; TVNode.Data:=NodeQuery;
DBTVNode.Expand(true); DBTVNode.Expand(true);