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

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


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


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