Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / FoxPro, Visual FoxPro Новый топик    Ответить
 InputMask и EMPTY - мелочь, а неприятно  [new]
Лисонька
Member

Откуда:
Сообщений: 294
Леди и джентльмены!
Наткнулась на одну мелочь, которая меня несколько удивила. Просто как-то никогда не задумывалась о таком случае.
Раньше у меня на форме стояли подряд по Tab Order'у неколько комбобоксов. Во всех (кроме последнего) в Valid было прописано мною:
IF EMPTY(this.value)=.f.
thisform.cmbРегистр2.Enabled=.t. && (или cmbРегистр3, или cmbРегистр4 и т.д - в зависимости от самого комбо)
ENDIF 
Теперь по ряду причин я сочла, что лучше поменять комбо на текстбоксы. У всех прописала InputMask='AA999.99'. И теперь код в Valid'е перестал срабатывать. Я так понимаю, что из-за точки EMPTY теперь всегда =.f. Выходит, что первая строка кода у меня должна быть такой:
IF THIS.VALUE=' . '
Правльно ли я все поняла?
Благодарю
12 июн 06, 15:17    [2763158]     Ответить | Цитировать Сообщить модератору
 Re: InputMask и EMPTY - мелочь, а неприятно  [new]
Cyv
Member

Откуда: Клайпеда
Сообщений: 164
автор
Правльно ли я все поняла?

Правильно. Но можно и так
thisform.cmbРегистр2.Enabled = !EMPTY(STRTRAN(this.value,[.],[]))
12 июн 06, 15:59    [2763241]     Ответить | Цитировать Сообщить модератору
 Re: InputMask и EMPTY - мелочь, а неприятно  [new]
Лисонька
Member

Откуда:
Сообщений: 294
Cyv

Правильно. Но можно и так
thisform.cmbРегистр2.Enabled = !EMPTY(STRTRAN(this.value,[.],[]))

Класс! Красиво, мне понравилось, даже очень понравилось )))))))))
Да еще все в одной строке вместо трех.
Благодарю всех-всех-всех!

Елизавета Скрунскайте
12 июн 06, 19:32    [2763660]     Ответить | Цитировать Сообщить модератору
Все форумы / FoxPro, Visual FoxPro Ответить