Контекстное меню

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
volod
Сообщения: 3
Зарегистрирован: 29 мар 2005, 17:49
Откуда: ЗахУкраїна Івано-Франківськцемент
Контактная информация:

Контекстное меню

Сообщение volod »

У меня проблемы с контекстным меню
Я его хочу подключить к интерфейсу

Что делал:

1.Имею интерфейс.
2.Написал контекстное меню.

TestPopup menu
{
- 'Test 1', cmValue1, 'Подсказка для Test 1', hcNoContext,,, sci1Esc;
- 'Test 2', cmValue2, 'Подсказка для Test 2', hcNoContext,,, sci1Esc;
}

3.Потом вызываю его з интерфейса.
HandleEvent
cmHotKeys:
PutHotCommand(RunMenu('TestPopup'));
cmValue1:
Message('Test 1');
cmValue2:
Message('Test 2');

End;

При зборке выдайот что
команды Value1,Value2
Помогите решить проблему!!
Спасибо...
coolibin
Постоянный обитатель
Сообщения: 151
Зарегистрирован: 29 мар 2005, 17:49

Re: Контекстное меню

Сообщение coolibin »

Не понял, чего "выдайот", но судя по всему не определены константы cmValue1 и cmValue2
Вот:
cmValue1 = 2221;
cmValue2 = 2222;
volod
Сообщения: 3
Зарегистрирован: 29 мар 2005, 17:49
Откуда: ЗахУкраїна Івано-Франківськцемент
Контактная информация:

Re: Контекстное меню

Сообщение volod »

Спасибо!!!
Пошло!!!
А номер констант выбирал
будь-какие!
Я раньше взял
что то 1000001,1000002
У меня не шло!!!!
Ответить