Фокус с грида не переходит на др. объект / FoxPro, Visual FoxPro

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Фокус с грида не переходит на др. объект

9 сообщений из 9, страница 1 из 1

Фокус с грида не переходит на др. объект

#33300925

Лисонька

Участник

Сообщения: 294

Рейтинг: 0 / 0

Леди и джентельмены!
Пользователь набирает символы в текстбоксе, потом нажимает стрелку вверх или вниз - в гриде меняется строка. Потом нужно, чтобы по нажатию Esс фокус возвратился в текстбокс. Пишу в Click у грида:

Код: plaintext

1.
2.
3.
4.
5.
6.

IF LASTKEY()= 27 
GOTO TOP
THIS.REFRESH
THISFORM.txtПоиск.VALUE=' '
THISFORM.txtПоиск.REFRESH
THISFORM.txtПоиск .SETFOCUS
ENDIF

Но фокус все равно остается у грида. Переписала этот код под Text у грида, фокус текстбокс все равно не получает.
Что неправльно делаю?
Благодарю

...

Рейтинг:

0 / 0

03.10.2005, 11:58:23

| Ответить | Цитировать | Написать

Фокус с грида не переходит на др. объект

#33300953

Лисонька

Участник

Сообщения: 294

Рейтинг: 0 / 0

Сама себе отвечаю.
Поставила в Init формы grid.enabled=.f.
Вот тогда все получается. Только верно ли поступила?

...

Рейтинг:

0 / 0

03.10.2005, 12:07:24

| Ответить | Цитировать | Написать

Фокус с грида не переходит на др. объект

#33301148

Владимир СА

Участник

Сообщения: 8 900

Рейтинг: 0 / 0

ЛисонькаЛеди и джентельмены!
Пользователь набирает символы в текстбоксе, потом нажимает стрелку вверх или вниз - в гриде меняется строка. Потом нужно, чтобы по нажатию Esс фокус возвратился в текстбокс. Пишу в Click у грида:

Код: plaintext

1.
2.
3.
4.
5.
6.

IF LASTKEY()= 27 
GOTO TOP
THIS.REFRESH
THISFORM.txtПоиск.VALUE=' '
THISFORM.txtПоиск.REFRESH
THISFORM.txtПоиск .SETFOCUS
ENDIF

Но фокус все равно остается у грида. Переписала этот код под Text у грида, фокус текстбокс все равно не получает.
Что неправльно делаю?
Благодарю
Вообщето клавиша Esc зарезервирована. Когда имеет место форма на форме у меня (я лично так поступаю) есть кнопка Cmd_quit, у нее свойство ставлю Cmd_quit.Cancel = .T. , т.е. находясь в форме пользователь нажимает клавишу Esc и происходит событие Click кнопки. На это событие ставлю:
THISFORM.Release()
т.е. форма уничтожается.
А если пользователь находится в GRIDе и нужен переход на другой объект формы, то зарезервировано: <Ctrl>+<Tab>

...

Рейтинг:

0 / 0

03.10.2005, 12:58:39

| Ответить | Цитировать | Написать

Фокус с грида не переходит на др. объект

#33301618

Лисонька

Участник

Сообщения: 294

Рейтинг: 0 / 0

Владимир САВообщето клавиша Esc зарезервирована. Когда имеет место форма на форме у меня (я лично так поступаю) есть кнопка Cmd_quit, у нее свойство ставлю Cmd_quit.Cancel = .T. , т.е. находясь в форме пользователь нажимает клавишу Esc и происходит событие Click кнопки. На это событие ставлю:
THISFORM.Release()
т.е. форма уничтожается.
А если пользователь находится в GRIDе и нужен переход на другой объект формы, то зарезервировано: <Ctrl>+<Tab>
Да, я попробовала, у меня тоже с CANCEL'ом кнопка сработала. Но CANCEL в этой командной строке Фокс пониает, а как задать ему Ctrl+Tab? Я пробовала посмотреть в KEYLABLE и INKEY, но там нужного нет.

...

Рейтинг:

0 / 0

03.10.2005, 15:47:04

| Ответить | Цитировать | Написать

Фокус с грида не переходит на др. объект

#33301658

Hel!Riser

Участник

Откуда: Нижний Новгород

Сообщения: 981

Рейтинг: 0 / 0

выстафь на форме frm.KeyPreview=.T. и в событии frm.KeyPress() забей следущее
LPARAMETERS nKeyCode, nShiftAltCtrl

Код: plaintext

1.
2.
3.
4.

IF nKeyCode= 27  AND this.ActiveControl.Name='grd'
	THISFORM.txtПоиск.VALUE=''
	THISFORM.txtПоиск.SetFocus()
	NODEFAULT
ENDIF

...

Рейтинг:

0 / 0

03.10.2005, 16:00:40

| Ответить | Цитировать | Написать

Фокус с грида не переходит на др. объект

#33301888

Лисонька

Участник

Сообщения: 294

Рейтинг: 0 / 0

Hel!Riserвыстафь на форме frm.KeyPreview=.T. и в событии frm.KeyPress() забей следущее
LPARAMETERS nKeyCode, nShiftAltCtrl

Код: plaintext

1.
2.
3.
4.

IF nKeyCode= 27  AND this.ActiveControl.Name='grd'
	THISFORM.txtПоиск.VALUE=''
	THISFORM.txtПоиск.SetFocus()
	NODEFAULT
ENDIF

Не-а...
Что мой программный код, что этот: в Load вставляю THISFORM.KeyPreview=.T., далее KeyPress() указанные строки кода, запуск и на Esc вместо полностью выделенной ячейки в строке грида - с этой ячейки выделение снимается и в ней появляется мигающий курсор.

...

Рейтинг:

0 / 0

03.10.2005, 17:10:23

| Ответить | Цитировать | Написать

Фокус с грида не переходит на др. объект

#33301933

Владимир СА

Участник

Сообщения: 8 900

Рейтинг: 0 / 0

Hi, Лисонька !
А в самом Grid-е попробовали набор клавиш <Ctrl>+<Tab>???
Можно где-нибудь под GRIDом поставить LABEL (с сереньким цветом), чтобы пользователь всегда мог вспомнить КАК ПЕРЕВОДИТЬ ФОКУС из GRIDа.

...

Рейтинг:

0 / 0

03.10.2005, 17:21:15

| Ответить | Цитировать | Написать

Фокус с грида не переходит на др. объект

#33301943

ВладимирМ

Участник

Откуда: г. Москва

Сообщения: 7 937

Рейтинг: 0 / 0

Ну, не знаю, что там понаписали. Сделал просто. В событии Grid.Column1.Text1.KeyPress() написал

Код: plaintext

1.
2.
3.
4.
5.
6.

LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode= 27  
	THISFORM.txtПоиск.VALUE=''
	THISFORM.txtПоиск.SetFocus()
	NODEFAULT
ENDIF

Разумеется, ThisForm.KeyPreview = .F. (значение по умолчанию). Все прекрасно работает. Фокус переходит куда надо.

...

Рейтинг:

0 / 0

03.10.2005, 17:23:22

| Ответить | Цитировать | Написать

Фокус с грида не переходит на др. объект

#33302252

Лисонька

Участник

Сообщения: 294

Рейтинг: 0 / 0

ВладимирМНу, не знаю, что там понаписали. Сделал просто. В событии Grid.Column1.Text1.KeyPress() написал

Код: plaintext

1.
2.
3.
4.
5.
6.

LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode= 27  
	THISFORM.txtПоиск.VALUE=''
	THISFORM.txtПоиск.SetFocus()
	NODEFAULT
ENDIF

Разумеется, ThisForm.KeyPreview = .F. (значение по умолчанию). Все прекрасно работает. Фокус переходит куда надо.
Начала эксперементировать с KeyPress(), дошла до Grid.Column1.Text1 и все получилось! :-)
Хотела написать про это в топик, а тут уже подсказка про Grid.Column1.Text1 ВладимираМ.
Благодарю всех.

Елизавета Скрунскайте

...

Рейтинг:

0 / 0

03.10.2005, 18:53:59

| Ответить | Цитировать | Написать

9 сообщений из 9, страница 1 из 1

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Фокус с грида не переходит на др. объект

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=41&msg=33301148&tid=1593367]:	0ms
get settings:	10ms
get forum list:	20ms
check forum access:	4ms
check topic access:	4ms
track hit:	218ms
get topic data:	10ms
get forum data:	4ms
get page messages:	61ms
get tp. blocked users:	2ms
others:	227ms

total:	560ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы