Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Как программно активировать пункт меню
|
|||
|---|---|---|---|
|
#18+
Создал свое меню, например такое: SET SYSMENU TO SET SYSMENU AUTOMATIC DEFINE PAD Pad1 _MSYSMENU PROMPT "Пункт1" DEFINE PAD Pad2 _MSYSMENU PROMPT "Пункт2" . . ON PAD Pad1 OF _MSYSMENU ACTIVATE POPUP Popup1 DEFINE BAR 1 OF Pad1 PROMPT "Пункт1-1" DEFINE BAR 2 OF Pad2 PROMPT "Пункт1-2" . . ON SELECTION BAR 1 OF Pad1 DO MyProc Как программно (а не интерактивно) активизировать требуемый пункт моего системного меню - например, для выполнения кода DO MyProc С уважением, Алексей ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.08.2004, 19:10 |
|
||
|
Как программно активировать пункт меню
|
|||
|---|---|---|---|
|
#18+
В нужном место кода просто вызвать процедуру MyProc() ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.08.2004, 19:35 |
|
||
|
Как программно активировать пункт меню
|
|||
|---|---|---|---|
|
#18+
Не годится.. Меня формируется программно и что там за код будет не известно заранее. С уважением, Алексей. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.09.2004, 08:45 |
|
||
|
Как программно активировать пункт меню
|
|||
|---|---|---|---|
|
#18+
Aleksey-KНе годится.. Меня формируется программно и что там за код будет не известно заранее. Раз он формируется программно, то как раз-таки можно заранее определить, что именно будет вызвано! Это делается через дополнительную процедуру "диспетчер" Т.е. вообще все BAR-пункты вызывают одну и ту же программу "диспетчер" передавая ей в качестве параметра свой порядковый номер или текст-указатель. Что-то вроде: ON PAD Pad1 OF _MSYSMENU ACTIVATE POPUP Popup1 DEFINE BAR 1 OF Pad1 PROMPT "Пункт1-1" DEFINE BAR 2 OF Pad2 PROMPT "Пункт1-2" . . ON SELECTION BAR 1 OF Pad1 DO DisProg WITH "Пункт1-1" PROCEDURE DispProg PARAMETERS cnBar DO CASE CASE m.cnBar="Пункт1-1" DO MyProc CASE m.cnBar="Пункт1-2" ... ENDCASE В случае необходимости, вызываешь не саму программу MyProc, а диспетчер DispProg с нужным параметром. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.09.2004, 09:57 |
|
||
|
Как программно активировать пункт меню
|
|||
|---|---|---|---|
|
#18+
Спасибо Владимир ! Примерно так я и решил эту задачу. Я имел в виду другое. Нет ли каких-нибудь команд VFP или через API для того, чтобы добраться к команде, определенной в ON SELECTION BAR ... Я так понял, что такой возможности нет :( С уважением, Алексей Климов, MCP, MSCE E-MAIL:vfox@bk.ru, ICQ:17060773 http://www.caws.atnet.ru/vfox ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.09.2004, 13:07 |
|
||
|
Как программно активировать пункт меню
|
|||
|---|---|---|---|
|
#18+
Есть, но только для системных пунктов меню SYS(1500, '_MED_PASTE', '_MEDIT') Для пользовательских пунктов SYS(1500) - не работает ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 01.09.2004, 14:27 |
|
||
|
|
start [/forum/topic.php?fid=41&msg=32674538&tid=1595829]: |
0ms |
get settings: |
8ms |
get forum list: |
16ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
89ms |
get topic data: |
14ms |
get forum data: |
3ms |
get page messages: |
64ms |
get tp. blocked users: |
2ms |
| others: | 257ms |
| total: | 461ms |
| 0 / 0 |
