Вниз
Скачать: CL | DM;

Контрол, вызывающий Акцию   Найти похожие ветки 

← →
TCrash   (2008-05-18 12:40) [0]

Доброе время суток.

Есть два бутона, которые выполняют одну и ту же акцию

Action1:=TAction.Create(nil);
Action1.OnExecute:=MyProc;

Button1.Action:=Action1;
Button2.Action:=Action1;


procedure MyClass.MyProc(Sender: TObject);
begin
 //
 //  Как в этом месте определить
 //
end;


Можно ли определить, нажатием какой из кнопок вызвано выполнение акции


← →
Плохиш ©   (2008-05-18 13:18) [1]

ActionComponent


← →
TCrash   (2008-05-18 14:20) [2]

> Плохиш ©   (18.05.08 13:18) [1]
Спасибо, подходит


← →
Style ©   (2008-05-19 15:32) [3]


> ActionComponent


на сколько я помню свойство появилось только в D7.


← →
Palladin ©   (2008-05-19 15:50) [4]

в D6 есть, значит, скорее всего, есть и в D5


← →
Style ©   (2008-05-19 15:58) [5]

Нет в 5ке нет, точно помню. Значит с D6 пошло.


← →
Elec3C ©   (2008-05-20 15:10) [6]

Акция? Забавно)))



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c
2-1211452478
Павел
2008-05-22 14:34
2008.06.15
TStringList; в Дельфи 6 - где объявить?


3-1199891890
Kolan
2008-01-09 18:18
2008.06.15
При Open у TQuery c RequestLive = True получаю AV&#133


15-1210083434
svetik
2008-05-06 18:17
2008.06.15
путь к рабочему столу не используя реестр


15-1205425934
Lio2007
2008-03-13 19:32
2008.06.15
Delphi 2007. Глюк с контекстным меню в IDE.


2-1211367421
tytus
2008-05-21 14:57
2008.06.15
Unit ActiveX was compiled with diffe-nt version of Windows.HiWord




   Наверх