ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / мистика в VFP8
13 сообщений из 13, страница 1 из 1
мистика в VFP8
    #32411727
funikovyuri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
funikovyuri
Участник
Переводим нашу АБС с VFP7 на VFP8. Вроде пока все более менее - кроме одной фигни: наткнулись мы на syntax error в одной из форм (при этом фокс просто пишет в окошке что ошибка - но выполнение не прерывает и даже результат этой, ошибочной, строчки получается правильным) - стали смотреть - окозалось что ошибку вызывает строка

Код: plaintext
1.
this.txtLabel1.Caption = '====='

После такого - даже как-то не смешно стало (это на VFP8 SP1)....

Может у кого такое уже было?
...
Рейтинг: 0 / 0
17.02.2004, 12:48
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411823
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NNN
Участник
Это не баг, это фича
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
oForm=NEWOBJECT('form')
oForm.AddObject('oLabel','label')
oForm.Visible= .T.
oForm.oLabel.Visible= .T.
oForm.oLabel.AutoSize= .T. 
oForm.oLabel.Caption='='          && Syntax error
oForm.oLabel.Caption=CHR( 61 )      && Syntax error
oForm.oLabel.Caption='=CHR(61)'   && Syntax error (?)
oForm.oLabel.Caption='=SYS(0)'
oForm.Caption='=SYS(0)'
_screen.Caption='=SYS(0)'

Enhancements to Visual FoxPro Designers
Table Designer enhancements
Building expressions in Caption field
...
Рейтинг: 0 / 0
17.02.2004, 13:27
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411897
funikovyuri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
funikovyuri
Участник
NNN

Огромное спасибо - а почему так происходит? Т.е. я так понимаю теперь в VFP можно для caption написать код который раньше пришлось бы писать в refresh?

А как теперь прсвоить caption'у строку из знаков '='?
...
Рейтинг: 0 / 0
17.02.2004, 13:48
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411919
Crip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Crip
Участник
this.txtLabel1.Caption = replicate("=",5)
...
Рейтинг: 0 / 0
17.02.2004, 13:55
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411924
Crip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Crip
Участник
ой облажался :)
...
Рейтинг: 0 / 0
17.02.2004, 13:57
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411947
Crip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Crip
Участник
работает только
this.txtLabel1.Caption = ' ====='
кошмар какой :)
...
Рейтинг: 0 / 0
17.02.2004, 14:03
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411949
Crip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Crip
Участник
ИМХО баг
...
Рейтинг: 0 / 0
17.02.2004, 14:04
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411965
funikovyuri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
funikovyuri
Участник
Crip - я так понял что в VFP8 сделали возможность указывать в Caption что-то что будет вычисляться динамически при refresh'е - т.е. мы можем написать

Код: plaintext
1.
...Caption = '=SomeFunc()'

и он будет это вычислять каждый раз

Т.е. в моем случае VFP решил что за '=' должно идти вычисляемое выражение - и соотвественно обломался...

В общем - надо к этой фиче привыкнуть
...
Рейтинг: 0 / 0
17.02.2004, 14:09
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411978
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NNN
Участник
Ага, фигня какая-то именно с Label происходит. Даже ON ERROR не срабатывает..
Там рекурсия что ли?
Код: plaintext
oForm.oLabel.Caption='="=[=SYS(0)]"'


> А как теперь прсвоить caption'у строку из знаков '='?

А вот фиг его знает.. Разве что:
Код: plaintext
1.
oForm.oLabel.Caption=' ====='
oForm.oLabel.Caption=='\<====='

Проще картинку нарисовать..
...
Рейтинг: 0 / 0
17.02.2004, 14:16
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32411997
funikovyuri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
funikovyuri
Участник
а если вот так?
Код: plaintext
this.Caption =  "=REPLICATE('=',5 )"
...
Рейтинг: 0 / 0
17.02.2004, 14:22
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32412012
АлександрК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлександрК
Участник
Все равно ошибку выдает.
Вариант NNN с пробелом в начале проходит без ошибки.
...
Рейтинг: 0 / 0
17.02.2004, 14:31
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32412184
VitalyT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VitalyT
Гость
Попробуй
this.Caption =" "+"REPLICATE('=',5)"
или
this.Caption =chr(32)+"REPLICATE('=',5)"

У меня отработало без ошибок.
В дизайнере форм:=" "+"="
...
Рейтинг: 0 / 0
17.02.2004, 15:32
| Ответить | Цитировать | Написать  
мистика в VFP8
    #32412894
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NNN
Участник
ЗЫ
INFO: List of Bugs That Are Fixed in Microsoft Visual FoxPro 8.0 Service Pack 1
Label - When you set the Caption property to a built-in property with a blank value (such as, Caption = '=thisform.tag') you receive the following error message:
There is not sufficient memory to complete this operation

Похоже, один баг исправили, один добавили..
...
Рейтинг: 0 / 0
18.02.2004, 09:07
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / мистика в VFP8
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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