Форум: "Базы";
Поиск по всему сайту: 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.72 MB
Время: 0.024 c
1-9481            heruvim4ik            2002-03-09 14:32  2002.04.04  
простейшая прога весит 300 кб...


1-9477            Serd_hhc              2002-03-25 11:50  2002.04.04  
Как проиграть MP3 - файл ?


3-9377            JibSkeart             2002-03-08 18:25  2002.04.04  
Пернести базу MSSQL 6.5 на MSSQL 7.xx Реально ли?


3-9424            метеоролог            2002-03-13 14:08  2002.04.04  
по базам данных


4-9669            sanjok                2002-02-02 21:23  2002.04.04  
Как запустить внешнее приложение из своей программы