Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Setfokus / 7 сообщений из 7, страница 1 из 1
27.01.2005, 14:33
    #32887164
Froggy
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Setfokus
При заполнении таблицы через форму с определенной строки требуется ввод только целых значений. Проверку делаю при вводе в свойстве lost focus. Но как в случае ошибки возвращать курсор обратно в ту же ячейку- у меня переходит в следующую. Я делаю так:
thisform.txtgr1.setfocus()
Что-то не так
...
Рейтинг: 0 / 0
27.01.2005, 14:40
    #32887189
Andrey Ts
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Setfokus
Froggy Проверку делаю при вводе в свойстве lost focus. Используйте вместо этого событие Valid
...
Рейтинг: 0 / 0
27.01.2005, 14:51
    #32887234
Froggy
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Setfokus
Тогда при ошибке выходит:
cannot call SetFocus from within a When, Valid, RangeHigh or RangeLow event
...
Рейтинг: 0 / 0
27.01.2005, 14:54
    #32887243
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Setfokus
Правильно пишет.
При неправильных данных делаешь RETURN 0
...
Рейтинг: 0 / 0
27.01.2005, 15:12
    #32887295
Froggy
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Setfokus
A kak тогда обнулять данные? Чтоб не вручную операторы энто делали?
...
Рейтинг: 0 / 0
27.01.2005, 15:18
    #32887324
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Setfokus
if not <УсловиеПроверки>
This.Value = 0 && или ""
return 0
endif
...
Рейтинг: 0 / 0
27.01.2005, 15:28
    #32887360
Froggy
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Setfokus
Спасибо все получилось
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Setfokus / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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