![]() |
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]() ![]() ![]() |
|
Gnusss |
|
||||
Бывалый ![]() Профиль Группа: Участник Сообщений: 190 Регистрация: 19.1.2005 Репутация: нет Всего: нет |
Привет всем.
Столкнулся с такой проблемой: Есть у меня несколько компонентов (например Self.Components), из всем (например) задать PopupMenu. Но проблема в том что все контролы разных классов, а сделать вот так:
Нельзя т.к. свойство PopupMenu у класса TControl находится в секции protected. Сделать вот так:
Получается, во-первых, слишком длинно, а во-вторых, не очень быстро. К сожалению, больше никаких идей как это можно организовать в голову не пришло. Что подскажите? Заранее благодарю за ответ. |
||||
|
|||||
VICTAR |
|
|||
Эксперт ![]() ![]() ![]() Профиль Группа: Участник Сообщений: 1108 Регистрация: 6.10.2006 Репутация: 37 Всего: 80 |
А какие конкретно компоненты?
|
|||
|
||||
Gnusss |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 190 Регистрация: 19.1.2005 Репутация: нет Всего: нет |
Разные, есть и стандартные есть и те которые я делал сам.
|
|||
|
||||
aktuba |
|
|||
![]() Смышленный ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1915 Регистрация: 24.4.2006 Где: Планета Земля Репутация: 16 Всего: 38 |
Как вариант - выводи popup-menu сам, т.е. перехватывай нажатие правой кнопки на форме и выводи меню...
-------------------- ![]() |
|||
|
||||
Snowy |
|
||||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 11363 Регистрация: 13.10.2004 Где: Питер Репутация: 192 Всего: 484 |
Колдуй баба, колдуй дед
![]() В модуле TypInfo есть такая процедурка:
Пример, как юзать:
Но! Если у него нет проперти PopupMenu, словишь исключение. Не забудь в try except заключить. Не забудь в uses добавить TypInfo; |
||||
|
|||||
Rennigth |
|
||||||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 1708 Регистрация: 21.6.2004 Где: Moscow Репутация: 49 Всего: 76 |
Добавлено @ 18:31 Блин, не усьпел ![]() Добавлено @ 18:35
А можно же и проверить на существование. Как-нить так:
-------------------- (* Honesta mors turpi vita potior *) |
||||||
|
|||||||
Gnusss |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 190 Регистрация: 19.1.2005 Репутация: нет Всего: нет |
Спасибо.
|
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: Общие вопросы" | |
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |