Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Оч.странная проверка валидности у лисы / 20 сообщений из 20, страница 1 из 1
09.04.2007, 10:02
    #34446472
alex11100
alex11100
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
public oForm
oForm = createobject('form1')
oForm.show( 1 )

DEFINE CLASS form1 AS form

	DoCreate = .T.
	Caption = "Form1"
	KeyPreview = .T.
	BindControls = .T.
	Name = "Form1"


	ADD OBJECT text1 AS textbox WITH ;
		ControlSource = "tt.a", ;
		Height =  23 , ;
		Left =  120 , ;
		Top =  84 , ;
		Width =  100 , ;
		Name = "Text1"


	ADD OBJECT command1 AS commandbutton WITH ;
		Top =  156 , ;
		Left =  192 , ;
		Height =  27 , ;
		Width =  84 , ;
		Caption = "Command1", ;
		Name = "Command1"


	PROCEDURE Load
		create cursor tt (a c( 10 ))
		insert into tt values ('555')
		select tt
		go top
	ENDPROC


	PROCEDURE text1.Valid
		return (this.Value='555')
	ENDPROC


	PROCEDURE command1.Click
		select tt
		brow
	ENDPROC


ENDDEFINE


запустите скрипт
последовательность нажатий

вводим 123
жмем Enter
жмем 2 раза Esc
жмем стрелку вниз
жмем на кнопочку и смотрим значение в курсоре

как страшно жить
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 10:33
    #34446571
Станислав С
Станислав С
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
alex11100
запустите скрипт
последовательность нажатий

вводим 123
жмем Enter
жмем 2 раза Esc
жмем стрелку вниз
жмем на кнопочку и смотрим значение в курсоре

как страшно жить
Ничего не понял... В чем проблема-то?
У меня (VFP 6) вроде бы все нормально:

Код: plaintext
1.
2.
3.
4.
5.
ввел  123  -> 
проверка валидности (возвращает F) -> 
откат к старому значению -> 
проверка валидности (возвращает T) -> 
показ таблицы.

Или я не понял проблемы.... Ткните носом, плз...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 10:35
    #34446576
piva
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
Саня - дейставительно страшно, черт никому верить нельзя даже себе
Хотя в Valid если поставить такой код
Код: plaintext
1.
2.
3.
k=this.Value='555'
Activate Screen
? k, this.value,  tt.a
return (k)
То конечно проверить это дело можно, тока нафига делать проверку в проверке. Вобщем ужас какой-то
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 10:40
    #34446594
piva
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
А проявляется только в VFP8SP1 В 6, 7 и 9-ке нету
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 10:42
    #34446599
alex11100
alex11100
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
9сп2 - есть
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 10:49
    #34446624
alex11100
alex11100
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
у себя полечил так

запоминаю на входе старое значение
в кейпрессе по ескейпу
принудительный реплейс курсора старым значением
(весь код понятное дело с проверками курсора и номера записи (на прослучай))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 11:25
    #34446765
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
alex11100у себя полечил так

запоминаю на входе старое значение
в кейпрессе по ескейпу
принудительный реплейс курсора старым значением
(весь код понятное дело с проверками курсора и номера записи (на прослучай))
Если в событие Valid() добавить

This.Refresh()

То проверка будет корректной, в том числе и по Esc, поскольку перед выходом из поля будет вытягиваться реально записанное значение.

Хотя, действительно странно. Причем глюк возникает только при втором Esc. Если Esc был только один, то все корректно проходит.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 14:16
    #34447398
asp_fox
asp_fox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
Глюк интересный, надо будет использовать :-)
Но и он лечится :(
Мы не содержимое Текст-бокса должны сравнивать, а поле курсора - ведь мы его привязали ControlSorce.

Нпример так:
RETURN ALLTRIM(tt.a)=='555'

или для универсальности (мало ли какое это будет поле):

LOCAL Lcc
Lcc=This.ControlSource
RETURN ALLTRIM(&Lcc)=='555'
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 14:22
    #34447410
asp_fox
asp_fox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
Надеюсь, жить уже не страшно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 15:51
    #34447715
alex11100
alex11100
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
2 asp_fox

если Вы таким образом реализуете ввод
20-ти значного рас.счета или КБК

авторюзвер начинает рвать волосы на голове

у себя или Вам
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 16:02
    #34447743
asp_fox
asp_fox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
Это похоже уже из другой оперы.
Вам теперь необходимо ввести контроль ввода 20-ти значного числа, не дожидаясь завершения ввода?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 16:10
    #34447769
alex11100
alex11100
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
мне и юзверу нужно,
чтобы после 2-х сбросов
осталось старое значение
и выйти из контрола

Вы думаете я не знаю как контрол привязать?
и как отвязать?
и как валидность проверить?

или Вы думаете, что я не проверял значение в курсоре???

все, завязали....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 16:13
    #34447772
alex11100
alex11100
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
да и

макроподстановкой не смешите меня
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.04.2007, 16:49
    #34447912
asp_fox
asp_fox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
автормне и юзверу нужно,
чтобы после 2-х сбросов
осталось старое значение
и выйти из контрола

Это точно из другой оперы - выяснялись бы яснее, в чем для вас ужас, не было бы так смешно ;-)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2007, 12:09
    #34449548
asp_fox
asp_fox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
Вчера за неимением времени не успел ответь с разворотом. :-)
А надо, так как своим ответом Вы можете завести нас - бедных начинающих в тупик.

Как оказалось, что глюк содержался в способе постановки вопроса - хотели спросить одно,
а показали фокус - как левой рукой достать правое ухо, спрашивая почему это неудобно.

тут все напряглись:

Pivaнафига делать проверку в проверке. Вобщем ужас какой-то

А оказалось:

alex11100мне и юзверу нужно,
чтобы после 2-х сбросов
осталось старое значение
и выйти из контрола

Не буду Вас смешить, как это обычно делается, особенно после того как прочитал:

alex11100у себя полечил так

запоминаю на входе старое значение
в кейпрессе по ескейпу
принудительный реплейс курсора старым значением
(весь код понятное дело с проверками курсора и номера записи (на прослучай))

Бедный ескейп! Тут Вы похоже левой рукой совсем голову обмотали :-)\
Вот вы пишете:
авторВы думаете я не знаю как контрол привязать?
и как отвязать?
и как валидность проверить?
Нет, это действительно много! Теперь Вы можете уже смелее двигаться вперед, изучая
возможности ООП, свойства, методы, события объектов! Вы найдете там еще много приятных сюрпризов для себя. Не буду интриговать, но обратите внимание на Where, на KeyPress, а вот Tag - что это за зверь такой и т.д ;-)?
А если к этому добвать немного уважения к тем ( пусть не даже не специалистов, в Вашем понимании), кто тратит время на разбор Ваших глюков, то со временем эти глюки постепенно исчезнут.
А про какой-то там Ескейп вообще - будете вспоминать с улыбкой!
Удачи!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2007, 13:46
    #34449904
piva
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
Ну прям всем нос утер теперь скажи малай - а почему в vfp6 и 7 все работает четко ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2007, 13:55
    #34449944
alex11100
alex11100
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
2 piva

не приставай к человеку

человек на расстоянии видит Чебоксарскую реализацию
и перегруженные классы, и прописывает лечение

макроподстановок наверное от кейсов набрался
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2007, 14:36
    #34450103
piva
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
Саня - уболтал - не буду, особенно после упоминания свойства Tag
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2007, 17:25
    #34450726
asp_fox
asp_fox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
alex11100 человек на расстоянии видит Чебоксарскую реализацию
и перегруженные классы, и прописывает лечение
макроподстановок наверное от кейсов набралсяээх...не угадали
"У таукитов
В алфавите слов -
Немного, и строй - буржуазный,
И юмор у них - безобразный."
Ничего личного, спасибо - хорошо повеселились.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2007, 17:31
    #34450749
asp_fox
asp_fox
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Оч.странная проверка валидности у лисы
piva теперь скажи малай - а почему в vfp6 и 7 все работает четко ? А оно тебе надо?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Оч.странная проверка валидности у лисы / 20 сообщений из 20, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 362ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1589566]:
 0ms
get settings:
 8ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 58ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 35ms
get tp. blocked users:
 1ms
others: 238ms
total:  362ms
x
x
Закрыть


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