|
Помогите с меню
|
|||
---|---|---|---|
#18+
мне необходимо через меню открыть таблицу напросмотр без использования форм. делаю вот так, но таблица открывается сразу же при запуске программы SET SYSMENU TO && Использование главного меню SET SYSMENU ON && Работа со строкой главного меню * Замена меню FoxPro на собственное * Определение заголовков создаваемого меню * PROMPT "\<Текст" - текст, появляющийся в строке меню DEFINE PAD POINT1 OF _MSYSMENU PROMPT "\<Открыть таблицу" DEFINE PAD POINT2 OF _MSYSMENU PROMPT "\<Закрыть" DEFINE PAD POINT3 OF _MSYSMENU PROMPT "\<Добавить" DEFINE PAD POINT4 OF _MSYSMENU PROMPT "\<Удалить" DEFINE PAD POINT5 OF _MSYSMENU PROMPT "\<Редактировать" DEFINE PAD POINT6 OF _MSYSMENU PROMPT "\<Поиск" * При переходе в пункт 1 меню показать POPUP-меню ON PAD POINT1 OF _MSYSMENU ACTIVATE POPUP SUPPORT1 DEFINE POPUP SUPPORT1 MARGIN FONT [Arial Cyr],11 DEFINE BAR 1 OF SUPPORT1 PROMPT "\<Таблица Marka" DEFINE BAR 2 OF SUPPORT1 PROMPT "\<Таблица zajavka" DEFINE BAR 3 OF SUPPORT1 PROMPT "\<Таблица zapchasti" * При выборе 1-го пункта меню открыть таблицу marka ON SELECTION BAR 1 OF SUPPORT1 use marka browse ON SELECTION BAR 2 OF SUPPORT1 use zajavka browse read events ... |
|||
:
Нравится:
Не нравится:
|
|||
15.12.2010, 19:34 |
|
|
start [/forum/topic.php?fid=41&fpage=83&tid=1584704]: |
0ms |
get settings: |
10ms |
get forum list: |
14ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
36ms |
get topic data: |
14ms |
get forum data: |
3ms |
get page messages: |
43ms |
get tp. blocked users: |
1ms |
others: | 296ms |
total: | 425ms |
0 / 0 |