Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / проврка на пробели / 5 сообщений из 5, страница 1 из 1
02.07.2006, 18:41
    #33826247
Снифф
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проврка на пробели
HI всем
у нас в тексбоксе маска 'АА9.9.А'
на Valid сделали порверку на пробелы
IF ' '$THIS.VALUE=.t.
=MESSAGEBOX("Ошибка!",48)
RETURN 0
ENDIF
сойдет такая проверка? можит есть боле рационалный путь?
...
Рейтинг: 0 / 0
03.07.2006, 11:10
    #33826788
Cyv
Cyv
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проврка на пробели
Более рационально убрать это из валида и засунуть в кнопку <Сохранить>
или что там у вас, или в метод который она вызывает. Там и ругаться на
юзера, более детально, и возвращать фокус на проблемный контрол.

А можно вообще не ругаться, а написать в LostFocus что-то вроде
Код: plaintext
1.
2.
DO WHILE SPACE( 1 ) $ This.Value
	This.Value = CHRTRAN(This.Value,SPACE( 1 ),[])
ENDDO
...
Рейтинг: 0 / 0
05.07.2006, 08:24
    #33831601
Снифф
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проврка на пробели
спасибо за консултацию
...
Рейтинг: 0 / 0
05.07.2006, 20:34
    #33834093
Hel!Riser
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проврка на пробели
еще гуманней неразрешать вводить это пробел путем добавления к txt.KeyPress()
Код: plaintext
1.
2.
IF nKeyCode= 32 
	NODEFAULT
ENDIF
...
Рейтинг: 0 / 0
05.07.2006, 22:33
    #33834191
Penner
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проврка на пробели
Hel!Riserеще гуманней неразрешать вводить это пробел путем добавления к txt.KeyPress()
Код: plaintext
1.
2.
IF nKeyCode= 32 
	NODEFAULT
ENDIF


Поможет, но не всегда, т.к. Ctrl+V не кто не отменял
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / проврка на пробели / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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