Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.04;
Скачать: [xml.tar.bz2];




Вниз

TAction and Shortcuts 


zzz   (2002-03-12 13:18) [0]

Создали ActionList на Form1, добавили в него Action1 в OnExecute написали ShowMessage("Test")
Бросили на форму PopupMenu1, добавили Item
Action:=Action1
ShortCut:=ctrl-A

Form1.PopupMenu:=PopupMenu1

Запускаем приложение, жмем ctrl-A - OnExecute работает

Добавлем форму Form2, бросаем PopupMenu2, добавляем Item
Action:=Form1.Action
ShortCut:=ctrl-A

Form2.PopupMenu:=PopupMenu2

Запускаем приложение, делаем Form2.Show, жмем ctrl-A - OnExecute НЕ работает !!!???

Как решить проблему ??
Прописывать ShortCut для TAction нельзя - нужна привязка к конкретному контролу..

Заранее thanks..



Shaman_Naydak   (2002-03-12 18:34) [1]

Не поверишь, не поленился повторить - все работает :)
D5



zzz   (2002-03-12 18:46) [2]

2Shaman_Naydak ©
Ты не поверишь, я не поленился сделать все тоже самое еще раз - НЕ РАБОТАЕТ !! :(
То есть когда делаю райт-клик на Form2 - в PopupMenu Item Ctrl-A надписи нету.. - соотв не работает и данная комбинация клавиш..

У меня тоже D5

Или я дурак или одно из двух :)))



Jony   (2002-03-12 20:09) [3]

А ты не поленись, и в ShotCut поставь "+" вместо "-" ("Ctrl+A")




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.019 c
7-9660            Davile                2002-01-04 17:19  2002.04.04  
Как загрузить курсор не из *.res


1-9549            Kostyanych            2002-03-23 00:46  2002.04.04  
А как реализовать drag&drop из, например, проводника в свою прогу?


1-9574            Malder                2002-03-24 21:07  2002.04.04  
Выскажите, пожалуйста, свои мысли по поводу моего задания =)


1-9511            daos                  2002-03-22 16:23  2002.04.04  
Помогите с потоками!


14-9599           tovSuhov              2002-02-21 08:36  2002.04.04  
---|Ветка была без названия|---