Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Закрытие формы / 9 сообщений из 9, страница 1 из 1
15.05.2005, 19:55
    #33065961
_Гость_
_Гость_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
Да еще аот что парни. У меня загружены 2 формы, как мне програмно закрыть из текущей формы, которая активна не активную.Заранее спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.05.2005, 21:41
    #33066013
Burn
Burn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
Передай ссылку на первую как параметр во вторую и по этой ссылке закрывай. Или юзай колекцию _VFP.Forms()
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.05.2005, 22:57
    #33066078
_Гость_
_Гость_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
А поподробнее......
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.05.2005, 23:28
    #33066097
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
А подробнее читай здесь

Использование форм в FoxPro
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.05.2005, 00:05
    #33066119
_Гость_
_Гость_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
А тут нет ничего чтобы мне помогло
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.05.2005, 09:38
    #33066290
Burn
Burn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
>А тут нет ничего чтобы мне помогло
А это?

Теперь, для того чтобы получить доступ к этой запущенной форме обратимся к коллекции форм объекта _Screen и выполним поиск:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
LOCAL lnFormCount, lnFindForm  
lnFindForm= 0   
    
FOR lnFormCount =  1  TO _SCREEN.FORMCOUNT  
     IF _SCREEN.FORMS(lnFormCount).NAME = "MyFormWithNewName"  
         lnFindForm= lnFormCount  
         EXIT  
      ENDIF  
ENDFOR

Если форма найдена и lnFindForm>0 , можно обращаться к форме через элемент коллекции _Screen :

_SCREEN.FORMS(lnFindForm).Caption=”Та самая форма”
_SCREEN.FORMS(lnFindForm).SomeMethod()


Вот в этом _SCREEN.FORMS(lnFindForm).SomeMethod() вместо SomeMethod() и вызывай Release формы

_SCREEN и _VFP это одно и тоже
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.05.2005, 10:38
    #33066423
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
_Гость_А тут нет ничего чтобы мне помогло
Ну, ты крут! Хочешь, чтобы тебе разжевали и в рот положили!

Тебе надо получить ссылку на форму, когда ты находишься вне формы. Первая половина статьи только этому и посвящяется. Более того, там описано как явно передать ссылку на форму родитель в дочернюю форму через параметр. И ты ничего не нашел?

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

Burn_SCREEN и _VFP это одно и тоже
Не совсем.

Код: plaintext
1.
2.
3.
4.
* Вот такой синтаксис корректен
?_VFP.Forms("MyFormName").Caption

* А вот это вызовет ошибку
?_SCREEN.Forms("MyFormName").Caption

В коллекции _SCREEN.Forms() допустимо обращение только по индексу, а в _VFP.Forms() можно и по имени.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.05.2005, 13:55
    #33067113
_Гость_
_Гость_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
Спасибо!! Я подумаю
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.05.2005, 14:25
    #33067216
_Гость_
_Гость_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрытие формы
Спасибо!! Точно все работает, я наверное просто устал вчера и не внимательно читал
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Закрытие формы / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 461ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1594246]:
 0ms
get settings:
 9ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 173ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 27ms
get tp. blocked users:
 1ms
others: 221ms
total:  461ms
x
x
Закрыть


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