TAction

[voltron]

У меня есть несколько элементов управления (кнопка на панели инструментов, пункт меню), выбор/нажатие которых приводит в выполнению одного и того же действия из ActionList'а. Можно ли в самом обработчике OnExecute узнать, на какой элемент нажал пользователь?
Пробовал воспользоваться кодом

Код: Выделить всё

procedure TForm1.Action1Execute(Sender: TObject);
begin
if (Sender as TComponent).Name='имя_кнопки' then....
end;


но ничего не получилось.
Можеть есть какой-то еще вариант?

[Sergei I. Gorelkin]

Для этого предназначено свойство TAction.ActionComponent. Но работает оно или нет - я не знаю...

[voltron]

Спасибо! Все работает!