Перевод фокуса на узел TreeView правой кнопкой мыши [D6]
Alexei © (2008-06-10 12:29:00)
При работе с TreeView сложилась такая проблема: сделал
RightClickSelect:=true (возможность выбора узла правой кнопкой), но
при выборе очередного узла правой кнопкой мыши фокус остаётся на
узле, который был выбран до этого, и команды контекстного меню
оказываются "привязанными" к узлу, на котором фокус. Перевести
фокус получается только при помощи клика левой кнопкой мыши.
Подскажите, как при выборе узла правой кнопкой мыши, перевести
фокус на выбранный узел, чтоб команды контекстного меню были для
него.
{RASkov} (2008-06-10 12:42:00) [1]
У тебя свой потомок от TTreeView? Т.е. ты делаешь свой
компонент?
Просто проблема решается и на стандартном TTreeView...
Например так:
procedure TForm1.TreeView1ContextPopup(Sender: TObject;
MousePos: TPoint; var Handled: Boolean);
var N: TTreeNode;
begin
N:=TreeView1.GetNodeAt(MousePos.X, MousePos.Y);
if N<>nil then TreeView1.Selected:=N;
end;
Наверх 
ЧАТ |
Орешник |
|
