Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв / 11 сообщений из 11, страница 1 из 1
21.02.2006, 08:35
    #33557318
Урал
Урал
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
вот такой вот вопрос, хотелось бы чтоб при этом первая буква всегда была заглавной, а остальные маленькие.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.02.2006, 09:14
    #33557387
nfp
nfp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
Как я понял ты вводишь какие-то символы в поле text1 и нужно убрать все символы кроме букв. Можно попробовать следующим образом
1 Все ненужные символы заменяем () на пробелы
CLvrem=CHRTRAN(alltrim(Thisform.text1.value),'123456789!@#$ ........', space(100))
2 k=len(CLvrem) && длина введенного поля
3 В переменную CLvrem1 перепишем все символы отличные от пробела
CLvrem1=''
for i=1 to k
if substr(CLvrem,i,1)#space(1)
CLvrem1=CLvrem1+substr(CLvrem,i,1)
endif
endfor
4 Thisform.text1.value=Upper(substr(CLvrem1,i,1)) +substr(CLvrem1,2) && Переведем 1-ю букву в заглавную
Thisform.text1.refresh
Это примерный алгоритм не проверенный .
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.02.2006, 09:25
    #33557410
Aleksey-K
Aleksey-K
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
Я такие операции выполняю в событии KeyPress объекта.
Вот пример кода, который меняет при вводе в textbox запятую на точку и апостроф на двойную кавычку:
KeyPress:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
LPARAMETERS nKeyCode, nShiftAltCtrl
DO CASE
	CASE TYPE("THIS.Value") == "C" AND nKeyCode =  39 
		*-- Замена ' на "
		DODEFAULT(34, nShiftAltCtrl)
		NODEFAULT
	CASE TYPE("THIS.Value") == "N" AND nKeyCode = 44
		*-- Замена , на .
		DODEFAULT( 46 , nShiftAltCtrl)
		NODEFAULT
ENDCASE
С уважением, Алексей
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.02.2006, 09:32
    #33557422
Hel!Riser
Hel!Riser
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
txt.Format="A" - ввод тока букф
и где-нить в txt.Valid() пропиши
this.Value=PROPER(this.Value) - начать с заглавной
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.02.2006, 09:33
    #33557423
nfp
nfp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
Пардон! Вам нужна первая большая, а остальные маленькие.Тогда последняя команда будет такая
Thisform.text1.value=Upper(substr(CLvrem1,i,1)) +Lower(substr(CLvrem1,2))

А еще можно посмотреть ANSI значения для букв. Они же располагаются группами . И проверить попадает ли код введенного символа в один из "буквенных" интервалов (cм. команду ANSI ).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.02.2006, 21:41
    #33559452
Doktor Gradus
Doktor Gradus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
А для чего именно вам это надо? Ввод фамилии? И что вы будете делать с образчиками типа "Склодовская-Кюри", "Бонч-Бруевич"? Аналогичная проблема с именами и отчествами, причём последнее вообще может отсутствовать.

Поэтому свойство format = A, конечно, не подходит. Тогда в событии keypress проверяйте, что было нажато и не пускайте в строку если нажато не то что нужно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.02.2006, 06:48
    #33559711
Урал
Урал
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
Doktor GradusА для чего именно вам это надо? Ввод фамилии? И что вы будете делать с образчиками типа "Склодовская-Кюри", "Бонч-Бруевич"? Аналогичная проблема с именами и отчествами, причём последнее вообще может отсутствовать.

Поэтому свойство format = A, конечно, не подходит. Тогда в событии keypress проверяйте, что было нажато и не пускайте в строку если нажато не то что нужно.

Понял, спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.02.2006, 06:50
    #33559714
Урал
Урал
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
Doktor GradusА для чего именно вам это надо? Ввод фамилии? И что вы будете делать с образчиками типа "Склодовская-Кюри", "Бонч-Бруевич"? Аналогичная проблема с именами и отчествами, причём последнее вообще может отсутствовать.

Поэтому свойство format = A, конечно, не подходит. Тогда в событии keypress проверяйте, что было нажато и не пускайте в строку если нажато не то что нужно.

Понял, спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.02.2006, 08:09
    #33559765
Урал
Урал
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
кто нибудь может привести все свойства FORMAT? Т.е. все маски, только на русском.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.02.2006, 11:01
    #33560139
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
Уралкто нибудь может привести все свойства FORMAT? Т.е. все маски, только на русском.
Существует официальный (от Microsoft) перевод HELP к VFP3 на русском языке. Скачать можно, например, вот здесь

http://vfp.narod.ru/Briefcase/Briefcase.htm

В очень многих случаях - этого вполне достаточно. В том числе и по свойствам Format и InputMask.

Правда, там "выпало" описание формата для InputMask "N" - это ввод только букв и цифр.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.02.2006, 12:35
    #33562426
Doktor Gradus
Doktor Gradus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв
Урал
В 3-ей версии свойство InputMask используется для объектов: Spinner, TextBox , в 6-ой для Column, ComboBox, Spinner, TextBox , а вот значения одинаковые, и что они означают, можно смотреть в хелпе для трёшки, а вот со свойством Format уже больше проблем:

1. Часть настроек/значений не используется для некоторых объектов, то есть в хелпе для 6-ки чётко написано, что для EditBox используется только значение "K", а другие в нём использовать нельзя. Самый большой набор значений идёт для TextBox и Column. А вот из хелпа для VFP3 не всегда ясно, что где можно использовать, т.к. написано, что свойство используется для 3-х объектов, а описание настроек идёт на примере TextBox.

2. Значение "M", подробно описанное в хелпе 3-ки, в 6-ой версии объявлено как for backward compatibility

Хелпы для более поздних( как и для других ) версий я так подробно не разглядывал, поскольку в работе использую только 3 и 6.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / как исключить из ввода цифры, знаки препеминая, т.е. все кроме букв / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 414ms
Закрыть
start [/forum/topic.php?fid=41&tablet=1&tid=1592262]:
 0ms
get settings:
 5ms
get forum list:
 8ms
check forum access:
 1ms
check topic access:
 1ms
track hit:
 161ms
get topic data:
 7ms
get forum data:
 1ms
get page messages:
 26ms
get tp. blocked users:
 1ms
others: 203ms
total:  414ms
x
x
Закрыть


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