Здравствуйте...
О чем может идти речь если Дестрой у формы выполняется, а у её компонентов не выполняется!
Причем я заметил следующее:
На форме есть грид, а у грида в ините я создаю объект:
this.oRightClick = CREATEOBJECT("empty")
ADDPROPERTY(this.oRightClick, "lSelected", .f.)
ADDPROPERTY(this.oRightClick, "Top", 0)
ADDPROPERTY(this.oRightClick, "Left", 0)
ADDPROPERTY(this.oRightClick, "Height", 0)
ADDPROPERTY(this.oRightClick, "BaseClass", "empty")
ADDPROPERTY(this.oRightClick, "Parent", this)

если строку "ADDPROPERTY(this.oRightClick, "Parent", this)" закоментарить , то форма закроется как положено.

MiklS splayn
если строку "ADDPROPERTY(this.oRightClick, "Parent", this)" закоментарить , то форма закроется как положено.
А если не Эзакоментировать, что пишет?
И зачем Grig объект Empty?

Ничего не пишет, просто все контролы остаются на своих местах, а форму закрыть нельзя, только свернуть или развернуть.

Этот объект необходим при создания всплывающего меню по правому клику на гриде.

MiklS Читайте Help!!!!!!!
References the container object of a control. Not available at design time; read-only at run time

in run time тоже самое...

MiklS read only переводится только для чтения!!!!!!!!!
Что Вы этим хотите сказать?

Поясню...
"Контейнер" empty мне нужен для хранения таких свойств как отступ слева, отступ сверху, ширина меню, родитель и еще пара свойств... по этому при создании формы меню я в форму передаю этот обект...

MiklSКак я уже говорил, Ваш Empty не нужен, но если Вы всётаки хотите сделать всё через ...., то добавляйте этот объект не в Grid, а в саму форму и ссылку делайте на Grid - ADDPROPERTY(this.oRightClick, "MyObject", this.Grid1)

Раз уж зашел такой разговор... ВАМ не приходило в голову, что у каждого грида может быть свое собственное меню... мало ли может гридов на форме больше одного... этот "лабораторный" случай я специально привел в качастве примера...

пришелмимов дестрое грида
написать

this.oRightClick = .f.

форма закроется

закрытие формы происходит в след-м порядке

автор
1. Form.queryUnload()
2. Form.destroy()
3. Form.[command buttons].destroy()
4. Form.[objects].destroy()
5. Form.unload()
6. DataEnvironment.afterCloseTables()
7. DataEnvironment.destroy()


Это мой дестрой в гриде
UNBINDEVENTS(this)
this.oRightClick = .NULL.
this.ofrmStartmenu = .NULL.
this.osubmenu = .NULL.
DODEFAULT()

просто поставил степ в дестрое формы он выполнился и все.... дестрой у контролов не выполняются...

а это свойство парент мне необходимо для рекурсивного вызова функции, в которой я высчитываю левый и верхний отступ появляющегося меню.

MiklSНу в таком случает Grid легче сделать на основе своего класса. Там хоть можно создавать не только свои свойства, но и методы обработки. А хранить настройки можно и в самом Grid -
This.AddProperty("lSelected")
Ну и так далее. Зачем для этого использовать "лишний" объект?

А много ли Вы встречали гридов со свойством oRightClick?

MiklSЭто понятно, но
ThisForm.Grid1.oRightClick.lSelected=.T.
или
ThisForm.Grid1.lSelected=.T.
получается короче, хотя смысл остаётся тот же!!!!!

Так... значит empty есть, был, и будет быть :).. это необходимо для переносимости меню на другие компоненты, а не только на любой грид... вопрос в другом... (см. выше!!!!)

прошелмимо
ну выдумщик

можешь не отписываться от событий
они из стека сами грохнутся при умирании объекта

дудефайлт - там метод предка какого-то
у тебя пронаследованные классы???

не нулл, .f.






да у меня пронаследованные классы. :) :) :) именно