powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Про меню
7 сообщений из 7, страница 1 из 1
Про меню
    #33078509
Akel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Как сделать некоторые пункты меню неактивными, если какая то форма открыта...
...
Рейтинг: 0 / 0
Про меню
    #33078582
Akel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Эх печально, все на дачах чтоль??? Или я вопрос непонятно сформулировал... Просто мне нужно, чтоб некоторые пункты меню при определенных действиях были Enabled=.F. как этого добится? Точнее как добраться до пункта в меню и поменять на FALSE ?
...
Рейтинг: 0 / 0
Про меню
    #33078585
Фотография Владимир СА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Посмотри здесь
http://]http://forum.foxclub.ru/read.php?f=29&i=5901&t=5750#reply_5901
И вообще поиск, много обсуждений.
...
Рейтинг: 0 / 0
Про меню
    #33078590
Sergey Ch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
OK,

Есть в дизайнере меню пунктик в Options - Skips For (вот там и пишете логические условия, когда меню должно быть неактивным)...

Подробнее об этом можно прочитать в Help.

Good luck!
...
Рейтинг: 0 / 0
Про меню
    #33078596
Akel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо=)
...
Рейтинг: 0 / 0
Про меню
    #33078619
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот пример одного из моих контекстных меню:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
LPARAMETERS loTextBox
LOCAL loForm AS Form

loForm = THISFORM
DEFINE POPUP tdk_menu SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR  1  OF tdk_menu PROMPT "Добавить № для типа документов" ;
	PICTURE "bitmaps\new.bmp"
DEFINE BAR  2  OF tdk_menu PROMPT "Удалить № для типа документов" ;
	SKIP FOR EOF("ListNDok") ;
	PICTURE "bitmaps\delete.bmp"
DEFINE BAR  3  OF tdk_menu PROMPT "Редактировать № для типа документов" ;
	SKIP FOR EOF("ListNDok") ;
	PICTURE "bitmaps\wzedit.bmp"

ON SELECTION BAR  1  OF tdk_menu loForm.NDokAdd()
ON SELECTION BAR  2  OF tdk_menu loForm.NDokDel()
ON SELECTION BAR  3  OF tdk_menu loForm.NDokEdit()

ACTIVATE POPUP tdk_menu
RELEASE POPUPS tdk_menu
Обрати внимание на выражения SKIP FOR .... в командах DEFINE BAR...
С уважением, Алексей.
...
Рейтинг: 0 / 0
Про меню
    #33078894
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi Aleksey-K!

Ну если было нужно по условию "ОПРЕДЕЛЁННАЯ форма открыта" то надо ... SKIP FOR WEXIST("Имя_формы")
Если имелось в виду что "ХОТЬ какая-то форма открыта" - то _SCREEN.FormCount = 0 - учитывая что там и невидимые формы, и свои тулбары будут учитываться...

Posted via ActualForum NNTP Server 1.2
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Про меню
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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