Hi sanya_tir!
Неправильные у тебя понятия... Через параметр это и делается. А править надо
лишь ту форму, вызов из которой ты и хочешь отследить - напиши там например
DO FORM Form2 WITH ThisForm
- в остальных ничего не правь, а в Init вызываемой напиши:
1.
2.
3.
4.
5.
6.
7.
LPARAMETERS toCaller
IF PCOUNT() < 1
* Вызвали из той формы, которая не передаёт параметра
ELSE
* Ага, параметр имеется - можно даже к вызывающей форме обратиться :)
* toCaller лучше запомнить в некоторое свойство Thisform - чтоб и из
других методов можно было обращаться.
ENDIF
P.S. Если форма есть в _SCREEN.forms() - значит она запущена (правда может
быть скрыта). Ещё есть старый добрый WEXIST("MyForm") - по Name формы можно
определить именно факт наличия такой формы, ну а по WVISIBLE("MyForm") и
факт "видимости".
P.P.S. Public переменные - зло, лучше держись от них подальше, пока не
поднатаскаешься в фоксе побольше (тогда по крайней мере ты не будешь
попадать в дурацкие проблемные ситуации из-за использования PUBLIC
переменных).
Posted via ActualForum NNTP Server 1.1
