powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Есть ли переменная.
9 сообщений из 9, страница 1 из 1
Есть ли переменная.
    #32356094
Новичек_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Как узнать, что свойство
заполнено и стало символьным
По разному извращаюсь, не выходит.
IF .NOT. TYPE("THIS.Namegridproper")="C"
MESSAGEBOX ("Не правильно задано свойство названия грида для кнопки cmdFilter")
RETURN
ENDIF
...
Рейтинг: 0 / 0
Есть ли переменная.
    #32356117
акм
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
IF TYPE("THIS.Namegridproper")="U"

тру-ля-ля...

ENDIF
...
Рейтинг: 0 / 0
Есть ли переменная.
    #32356210
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
RTFM on PEMSTATUS()
...
Рейтинг: 0 / 0
Есть ли переменная.
    #32356212
Новичек_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да в том то и дело, что
U(неопределенная) мне не надо.
переменная создана в дизайнере, таким образом
ей присвоилось .F.
Таким образом в любом случае вернется истина.
Я же четко поставил вопрос:
-Как узнать, что свойство
заполнено и стало символьным
...
Рейтинг: 0 / 0
Есть ли переменная.
    #32356217
АлександрК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А если примерно так:
IF ! EMPTY(THIS.Namegridproper)
IF TYPE("THIS.Namegridproper") # "C"
MESSAGEBOX ("Не правильно задано свойство названия грида для кнопки cmdFilter")
ENDIF
ELSE
MESSAGEBOX ("Не задано свойство названия грида для кнопки cmdFilter")
ENDIF
...
Рейтинг: 0 / 0
Есть ли переменная.
    #32356225
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
дык если в Дизайнере создал, то проста в окошке пропертей удали этот .F. - получица (None) - значит пропертя символьна и пустая. Такое же можно добица указав в том же пропертном окошке ="". Если же нужно присвоить вновь заведенной проперти число - прописываеца 12 или =12.
...
Рейтинг: 0 / 0
Есть ли переменная.
    #32356233
Новичек_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да примерно я конечно представляю , какие телодвижения надо сделать
тут можно проверять и перепроверять.
Но потом разбираться в лишних телодвижениях не хочется.
Сделали свойство в дизайнере, оно стало логическое и ему присвоено .F.
Да ясно что лишний шаг-сделать его символьным я догадаюсь как сделать, а потом проверить на пустоту и тип.
И так делал тоже IF TYPE("THIS.Namegridproper") # "C"
вариант с .NOT. уже от безисходности.
...
Рейтинг: 0 / 0
Есть ли переменная.
    #32356403
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну так ты сформулируй что именно надо проверить:

1) Пропертя существует. Проверять факт ее существования не надо
2) Если пропертя не заполнена, то она имеет логический тип и значение .F.
3) Если пропертя заполнена, то она имеет символьный тип.

Как следствие - если пропертя имеет логический тип (ну или в общем случае тип отличный от символьного), значит она не заполнена.

Еще одна тонкость - это относительная ссылка THIS. Ты уверен, что обращаешся туда, куда надо. Т.е. ссылаешся именно на тот объект, в котором и существует данная пропертя? Может у тебя это пропертя формы, а ты делаешь проверку из события Click() кнопки? Если речь идет о преперти формы, лучше пиши THISFORM

IF TYPE("ThisForm.Namegridproper")#"C"
* Пропертя не заполнена
ENDIF
...
Рейтинг: 0 / 0
Есть ли переменная.
    #32357526
Новичек_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот это очень интересно и понятно.
>Как следствие - если пропертя имеет логический тип (ну или в общем случае >тип отличный от символьного), значит она не заполнена.

ссылка правильная, обижаете.:-)))))))))

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


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