Я уже писал по теме Treeview проблема в том что при кликании на итеме левой кнопкой по-мимо синнего выделения вокруг итема появляется прирывистая пунктирная линия а когда кликаеш правой на другом итеме он выделяется синем но не появляется рамка из пунктирной линии она остается на прежнем итеме
Дыкть вот как после правого клика на итеме с'имитировать левый клик на нем же чтобы вокруг негог появилась рамка


AY>  Добавить узел
AY>  procedure TMainForm.AAddExecute(Sender: TObject);
AY>  Begin
AY>   with TreeView do
AY>    if Selected <> nil then Selected := Items.Add(Selected, 'Text');
AY>  End;

AY>  Добавить дочеpний узел
AY>  procedure TMainForm.AAddChildExecute(Sender: TObject);
AY>  begin
AY>   with TreeView do
AY>     if Selected <> nil then Selected := Items.AddChild(Selected,
AY> 'ChildText'); End;

Делаю вплывающую менюшку где при кликании на нужный пункт создаю дочерный узел
но он создается в первом узле RightClickSelect - не помогает что-делать

TTreeView.RightClickSelect ?