Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.18;
Скачать: CL | DM;

Вниз

Перехват ShortCut через ApplicationEvents?   Найти похожие ветки 

 
SisiusP   (2004-03-31 16:02) [0]

На форме есть PageControl, на котором 2 закладки.
На каждой закладке есть кнопка, на которых есть одинаковый ShortCut - F5.
При выборе закладки и нажатию F5 нужно выполнять что-то разное.
Как это сделать?
Пробую через ApplicationEvents, событие OnShortCut, но без рез-та:
 if (Msg.CharCode = VK_F5) then begin
   if (pcMain.ActivePage = tbsDay) then actRefreshExecute1(nil)
   else if (pcMain.ActivePage = tbsHour) then actRefreshExecute2(nil);
 end;
Что не так я делаю? Заранее спасибо.


 
Ega23 ©   (2004-03-31 16:14) [1]

Заведи action, на него повесь ShortCut, а дальше в OnExecute обрабатывай свои  
if (pcMain.ActivePage = tbsDay) then actRefreshExecute1(nil)
  else if (pcMain.ActivePage = tbsHour) then actRefreshExecute2(nil);


 
SisiusP   (2004-03-31 16:34) [2]

Это понятно. Когда я нажимаю F5, то всегда срабатывает первый Action, а мне надо тот, который относится к нужной странице.


 
Игорь Шевченко ©   (2004-03-31 17:05) [3]

А у actRefreshExecute1 и actRefreshExecute2 надо убрать ShortCut



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

Текущий архив: 2004.04.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.12 c
1-1080727223
Виноградов Алексей
2004-03-31 14:00
2004.04.18
Моя консольная программа отображает русский текст иероглифами(+)


6-1076414046
метеоролог
2004-02-10 14:54
2004.04.18
Компоненты для отправки почты


1-1081014494
3879546211
2004-04-03 21:48
2004.04.18
как создать кнопку


1-1080657075
Назаров Евгений
2004-03-30 18:31
2004.04.18
Оконтовка ячейки при создании Exel файла из Delphi


3-1079453966
DataBase
2004-03-16 19:19
2004.04.18
Как получить общее количество записей в таблице