Форум: "Базы";
Поиск по всему сайту: 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.015 c
1-9475            Dimedrol              2002-03-21 10:38  2002.04.04  
Настраиваемый интерфейс


1-9564            Sound                 2002-03-23 17:52  2002.04.04  
Как передать данные из одной формы в другую?


3-9394            SashaG                2002-03-12 08:59  2002.04.04  
Пытаюсь св-ву Filter TTable сделать так:


3-9360            Igor_                 2002-03-11 14:55  2002.04.04  
Grant to ALL в InterBase


1-9514            jenbond               2002-03-23 08:54  2002.04.04  
Помоги