Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / RighClick Event / 3 сообщений из 3, страница 1 из 1
05.12.2005, 15:20:22
    #33417455
Stind
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RighClick Event
Народ, подскажите, как прописать в RighClick Event вызов меню, например, две строки - Печать и Корректировка с соответствующими запусками процедур?
...
Рейтинг: 0 / 0
05.12.2005, 15:40:39
    #33417514
Aleksey-K
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RighClick Event
Например так:
RighClick:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
LOCAL loForm AS Form
loForm = THISFORM

DEFINE POPUP ino_menu SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR  1  OF ino_menu PROMPT "Добавить..." ;
	SKIP FOR !loForm.IsCanAdd ;
	PICTURE "bitmaps\addl.bmp"
DEFINE BAR  2  OF ino_menu PROMPT "Удалить" ;
	SKIP FOR !loForm.IsCamDelete ;
	PICTURE "bitmaps\del.bmp"
ON SELECTION BAR  1  OF ino_menu loForm.Add()
ON SELECTION BAR  2  OF ino_menu loForm.Del()
	
ACTIVATE POPUP ino_menu
RELEASE POPUPS ino_menu
С уважением, Алексей
...
Рейтинг: 0 / 0
05.12.2005, 15:41:54
    #33417520
Stind
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RighClick Event
Спасибо!
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / RighClick Event / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]