powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / горячие клавиши формы
15 сообщений из 15, страница 1 из 1
горячие клавиши формы
    #33166779
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день. Вопрос новичка.
Подскажите, пожалуйста, что я упустила или как это должно быть.
В форме KeyPreview =.t., а в KeyPress() я хочу указать реакцию на нажатие клавиш CTRL+F9. Но метод KeyPress() не выполняется, а происходит сворачивание окна. Как подавить реакцию на эти клавиши (Ctrl+F9, Ctrl+F10 и др. из левого верхнего меню формы) и навязать свою?
Заранее благодарна.
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33166898
S
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
S
Гость
LPARAMETERS nKeyCode, nShiftAltCtrl
If nkeycode=102
NoDefault
..... (твои команды)
EndIf
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33166932
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Nodefault ни в каком месте не помогает.
А в метод KeyPress при нажатии этих клавиш вообще не вызывается.
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33166959
S
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
S
Гость
Ещё как вызывается. Поставь в KeyPress Set step on - сама увидишь
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33166974
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ну и поставила.
Все равно не вызывается. :)
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33166988
S
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
S
Гость
У меня вызывается. Лови примерчик
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33167015
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
У меня, видимо, что-то с настройками не то.
Твой пример у меня тоже не работает. Окно сворачивается и все.
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33167024
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А запустила седьмой фокс. Работает новмально.
А моя программа под 6-ым.
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33167109
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
И что делать посоветуете?
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33167289
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi k_sv!

Придётся ON KEY LABEL использовать... Скажем в Form.Activate установить, а в Deactivate И Destroy снять. В команде укажи _SCREEN.ActiveForm.YourMethod(1) - это на случай если разные комбинации одним методом ловить будешь.

Ну и как обычно старый совет - НЕ СТОИТ бороться с зарезервированными комбинациями клавиш - неужели так мало кнопок на клавиатуре, что нудно ИМЕННО системное сочетание использовать :)

Posted via ActualForum NNTP Server 1.2
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33167451
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может быть у Вас в главном меню приложения есть обработчик для Ctrl +F9 (фактически это и есть ON KEY LABLE...), который всегда обрабатывается ДО KeyPress формы ?
С уважением, Алексей.
P.S.
Для проверки вставил в одну из своих форм код в событие KeyPress:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode =  102  AND nShiftAltCtrl =  2 
	WAIT WINDOW "CTRL+F9"
	NODEFAULT
ELSE
	DODEFAULT(nKeyCode, nShiftAltCtrl)
ENDIF
Все прекрасно работает.
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33176755
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Igor Korolyov Ну и как обычно старый совет - НЕ СТОИТ бороться с зарезервированными комбинациями клавиш - неужели так мало кнопок на клавиатуре, что нудно ИМЕННО системное сочетание использовать :)

Можно, конечно и другие клавиши взять. Просто у нас на предприятии используется комплекс программ именно с таким интерфейсом. Вот и хотелось подстроиться.
Aleksey-K Может быть у Вас в главном меню приложения есть обработчик для Ctrl +F9 (фактически это и есть ON KEY LABLE...), который всегда обрабатывается ДО KeyPress формы ?

Насчет обработчика проверяла. Ничего нету.
И вообще, на разных компьютерах создавала новую форму (с нуля) и везде один и тот же результат.

Подскажите, пожалуйста, как убрать меню формы, которое вызывается при нажатии в левом верхнем углу (там, где лис обычно). Простите, не знаю, как оно называется.
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33176893
Burn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть в 6-ке ряд волшебных сочетаний, которык намертво перехватываются самим фоксом и недоходит до KeyPress. Единственый способ в этом случае ON KEY LABEL
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33177050
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi k_sv!

> Подскажите, пожалуйста, как убрать меню формы, которое вызывается при
> нажатии в левом верхнем углу (там, где лис обычно). Простите, не знаю, как
> оно называется.

Системное меню окна. Отключается по ControlBox = .F. - конечно без очень
веских
причин отключать его не стоит...

Posted via ActualForum NNTP Server 1.2
...
Рейтинг: 0 / 0
горячие клавиши формы
    #33177432
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Hi, k_sv !

Может быть тогда лучше тебе пользоваться своим собственным окном формы, полностью скрывая окно VFP с помощью установки формы ShowWindow=2 (As TopLevelForm) и записей SCREEN = OFF (хотя бы SYSMENU = OFF) в файле настроек CONFIG.FPW ?
В этом случае после запуска exe-шника - любые сочетания твоих клавиш не будут затрагивать системных. И можно уже будет назначать на них свои действия. Также не будет и необходимости убирать меню главного окна - его уже просто не будет.
...
Рейтинг: 0 / 0
15 сообщений из 15, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / горячие клавиши формы
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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