Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Фрма-справочник ??? / 4 сообщений из 4, страница 1 из 1
25.10.2006, 11:15
    #34079385
Vaso116
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фрма-справочник ???
Дело обстоит так: надо в одной форме сформировать адрес (сделано уже) и из text1 одной формы передать в text1 другой.
завести бы глобальную переменную, но как это сделать??? - я не знаю сильно зелен
...
Рейтинг: 0 / 0
25.10.2006, 11:28
    #34079433
PaulWist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фрма-справочник ???
/topic/262644&hl=%ea%ee%f0%ee%eb%e5%e2%e0
...
Рейтинг: 0 / 0
25.10.2006, 12:10
    #34079630
sdemon
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фрма-справочник ???
Определяет глобальные переменные памяти или массивы.

PUBLIC val1,val2
val1 = 10
val2 = 15


Если вы хотите объявить переменную памяти или массив глобальным, сделайте это до присваивания им значений.

Если вы в своей программе присвоите значение переменной памяти (или массиву), а позже объявите эту переменную (массив) глобальной с помощью команды PUBLIC, Visual FoxPro сгенерирует ошибку синтаксиса.
...
Рейтинг: 0 / 0
25.10.2006, 13:50
    #34080107
Владимир СА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фрма-справочник ???
Vaso116Дело обстоит так: надо в одной форме сформировать адрес (сделано уже) и из text1 одной формы передать в text1 другой.
завести бы глобальную переменную, но как это сделать??? - я не знаю сильно зелен
Может быть так:
В событии Text1.Valid или возможно менее удачно в Text1.InteractiveChange
Код: plaintext
1.
2.
IF TYPE("_VFP.Forms('<имя формы>')") = "O"
    _VFP.Forms('<имя формы>').text1.Value = THIS.Value
ENDIF
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Фрма-справочник ??? / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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