Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.07.13;
Скачать: [xml.tar.bz2];

Вниз

Перевод фокуса на узел TreeView правой кнопкой мыши   Найти похожие ветки 

 
Alexei ©   (2008-06-10 12:29) [0]

При работе с TreeView сложилась такая проблема: сделал RightClickSelect:=true (возможность выбора узла правой кнопкой), но при выборе очередного узла правой кнопкой мыши фокус остаётся на узле, который был выбран до этого, и команды контекстного меню оказываются "привязанными" к узлу, на котором фокус. Перевести фокус получается только при помощи клика левой кнопкой мыши. Подскажите, как при выборе узла правой кнопкой мыши, перевести фокус на выбранный узел, чтоб команды контекстного меню были для него.


 
{RASkov} ©   (2008-06-10 12:42) [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;



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2008.07.13;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.008 c
2-1213185815
TUserClass
2008-06-11 16:03
2008.07.13
Как убрать MessageBeep?


2-1213165605
Кирей
2008-06-11 10:26
2008.07.13
отображение русского текста в компонентах BDE и RAVE


3-1202115145
Tsyba_Stanislav
2008-02-04 11:52
2008.07.13
Проблема возврата строк в запросе под ОС Виста


15-1210961167
@!!ex
2008-05-16 22:06
2008.07.13
Как писать на С++, а не на Дельфи?


15-1211903807
Randew
2008-05-27 19:56
2008.07.13
Почему не запускаются программы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский