powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / RighClick Event
3 сообщений из 3, страница 1 из 1
RighClick Event
    #33417455
Stind
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Народ, подскажите, как прописать в RighClick Event вызов меню, например, две строки - Печать и Корректировка с соответствующими запусками процедур?
...
Рейтинг: 0 / 0
RighClick Event
    #33417514
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Например так:
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
RighClick Event
    #33417520
Stind
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо!
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / RighClick Event
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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