VPF::Taction - как распознать кто Sender? - Форум программистов

Vit

Дата 2.3.2005, 06:30 (ссылка)

(нет голосов)

Загрузка ...

Vitaly Nevzorov

Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207

Есть Action, есть несколько элементов ассоциированные с ней: кнопка, пункт главного меню, пункт всплывающего меню...

Как в обработчике событий от Action выяснить что именно инициировало срабатывание Action - Shortcut, нажатие кнопки или пункта меню? Sender во всех случаях Action....

--------------------

With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru

Alex

Дата 2.3.2005, 07:56 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 80
Всего: 162

Sender во всех случаях действительно одинаковый, но у каждого Action'а есть такое свойство как ActionComponent, о котором в справке написано:

Цитата

Indicates the client component that caused this action to execute.

Delphi syntax:

property ActionComponent: TComponent;

C++ syntax:

__property TComponent* ActionComponent = {read=FActionComponent, write
=FActionComponent};

Description

Use ActionComponent to discern which client component caused this action to execute. For example, examine ActionComponent from an OnExecute event handler if you need to know what user action triggered this action.

When the user clicks a client control, that client sets ActionComponent before calling the action’s Execute method. After the action executes, the action resets ActionComponent to nil (Delphi) or NULL (C++).

PS:
Самое смешное, что месяц назад мне тоже нужно было такое определение, но тогда я не нашел как это сделать и пришлось изобретать велосипед. smile

--------------------

Написать можно все - главное четко представлять, что ты хочешь получить в конце.

Vit

Дата 2.3.2005, 23:31 (ссылка)

(нет голосов)

Загрузка ...

Vitaly Nevzorov

Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207

Спасибо! Даже не надеялся что будет решение! Думал о велосипеде!

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »