Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / нажатие Entera в textbox / 10 сообщений из 10, страница 1 из 1
06.11.2009, 10:55
    #36294054
Andres N.
Andres N.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
Курсор находится в textbox-e. Как можно делать так что после нажатие Entera курсор прощел на какой-то позиции (не в начале, допустим в 8-й позиции) этого же textboxa?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 11:14
    #36294103
reware
reware
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
Andres N.Курсор находится в textbox-e. Как можно делать так что после нажатие Entera курсор прощел на какой-то позиции (не в начале, допустим в 8-й позиции) этого же textboxa?

В KeyPress этого текстбокса пишем :
Код: plaintext
1.
2.
3.
LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode= 13 
	this.SelStart= 8 
endif

В свойствах самой формы ставим TabStop=.f., чтобы курсор автоматически не перемещался по контролам при нажатии Tab/Enter.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 11:19
    #36294118
GoshaS
GoshaS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
В KeyPress
Код: plaintext
1.
2.
3.
4.
IF nKeyCode= 13 
	KEYBOARD '{RIGHTARROW}'
	NODEFAULT 
ENDIF
Сместит курсор на одну позицию вправо. Дальше думаю сами догадаетесь.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 11:21
    #36294129
GermanGM
GermanGM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
reware, +nodefault
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 11:30
    #36294165
Andres N.
Andres N.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
reware
В свойствах самой формы ставим TabStop=.f., чтобы курсор автоматически не перемещался по контролам при нажатии Tab/Enter.
На форме есть много textboxы. Это мне надо только для 2-х textboxax. А для остольных обычный tab/enter должен работат. Поэтому TabStop=.f. мешает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 11:46
    #36294227
GermanGM
GermanGM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
Andres N., в событии KeyPress ((С) reware):

LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode=13
nodefault
this.SelStart=8
endif
Наверное это то, что Вам нужно. А TabStop у формы лучше вернуть в исходное значение
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 11:56
    #36294262
Andres N.
Andres N.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
GermanGM,
курсор после нажатие entera проходить в нужную (8-й) позицию. Но, если после этого еще раз нажат enter, курсор должен проходить на следующий textbox. Но этого не происходить.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 12:19
    #36294362
GoshaS
GoshaS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
Может быть так?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
*Init
this.Comment=''
****************
*KeyPress
IF nKeyCode= 13  and empty(this.comment)
  this.SelStart= 8 
  nodefault
  this.Comment=':-)'
endif
****************
*Valid
this.Comment=''
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 12:47
    #36294463
GermanGM
GermanGM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
Andres N, честно говоря, не пойму зачем подобные изыски,но, в принципе, дополнить код можно:

LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode=13
if !this.selstart=8
node
this.SelStart=8
endif
endif

в предположении, что если пользователь не ввел никакой значащей информации, то повторное нажатие ENTER означает переход к следующему контролу формы. А больше не знаю как...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.11.2009, 13:22
    #36294610
Andres N.
Andres N.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
нажатие Entera в textbox
GermanGM, спасибо, получилас.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / нажатие Entera в textbox / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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