Главная страницаОбратная связьКарта сайта

Выделять узел TTreeView правой кнопкой мыши

Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch

procedure TForm1.TreeView1ContextPopup(Sender: TObject; MousePos: TPoint;
   var Handled: Boolean);
 var
   tmpNode: TTreeNode;
 begin
   tmpNode := (Sender as TTreeView).GetNodeAt(MousePos.X, MousePos.Y);
   if tmpNode <> nil then
     TTreeView(Sender).Selected := tmpNode;
 end;

Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация по разработке на Delph - "Выделять узел TTreeView правой кнопкой мыши", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!
   


Copyright © 2008 - 2021 Дискета.info