ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Про PopupMenu
3 сообщений из 3, страница 1 из 1
Про PopupMenu
    #32180319
Kidd
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kidd
Участник
Господа подскажите пожалуйста, как сделать PopupMenu на TreeView. Сами мы понятно не местные и плохо пока обучены премудростям Delphi.

Затеял прогу типа административной для баз Sql Server. (Понятно что есть у сервера EM но заказчику надо "выжимку" и под него.)

Суть. Сделал TreeView. Узлы в реестре создаются. Верхний корневой узел с Picture папка. Его дочерний так же. Далее могут идти собственно объекты: Зарегистрированные сервера, базы, и объекты баз (c др. Picture). В общем структура типа EM.

Вопрос. Как сделать PopupMenu для узлов с папками с одними командами,

для узлов - объектов с другими командами. Чтоб вызывалось это меню при щелчке на конкретном узле, а не на поле самого TreeView.

Может словами или кода кусок толковый кто подкинет. А то TreeView худо-бедно сделал. После этого (регистрация в реестре, регистрация объектов базы) тоже знаю как. Ну и далее вызов процедур и запросы к системным базам слабаем. А с этим чего то тупо затормозился.

Заранее спасибо.
...
Рейтинг: 0 / 0
10.06.2003, 11:33
| Ответить | Цитировать | Написать  
Про PopupMenu
    #32180344
Speaker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Speaker
Участник
можно сделать так:

Код: plaintext
1.
2.
3.
4.
TObjectType = (objRoot, objFolder, objDatabase ..... );
TMyObject = record
  objType : TObjectType;
  ....
end;

эту запись суй в TTreeNode.Data, при обработке
OnPopup для меню или OnChange для TreeView
смотри, какой элемент выделен, и в зависимости
от objType разрешай / запрещай / показывай / скрывай
пункты меню.
...
Рейтинг: 0 / 0
10.06.2003, 11:53
| Ответить | Цитировать | Написать  
Про PopupMenu
    #32180345
Kidd
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kidd
Участник
2Speaker
Спасибо.
...
Рейтинг: 0 / 0
10.06.2003, 11:56
| Ответить | Цитировать | Написать  
3 сообщений из 3, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Про PopupMenu
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]