Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.10.28;
Скачать: CL | DM;

Вниз

Как отловить назначение Parent для своего Owner?   Найти похожие ветки 

 
Ega23 ©   (2007-10-08 14:17) [0]

Ситуация: есть TFrame, на нём много всякого, в том числе один из самописных компонентов.
В ран-тайм этот фрейм создаётся, инициализируется как надо, после чего ему назначается Parent.
Вопрос: как на уровне моего компонента отследить данное событие?


 
MBo ©   (2007-10-08 14:27) [1]

SetParent перекрыть?


 
Джо ©   (2007-10-08 14:28) [2]

> [0] Ega23 ©   (08.10.07 14:17)
> Ситуация: есть TFrame, на нём много всякого, в том числе
> один из самописных компонентов.
> В ран-тайм этот фрейм создаётся, инициализируется как надо,
> после чего ему назначается Parent.
> Вопрос: как на уровне моего компонента отследить данное
> событие?

Уже начиная с TControl имеется procedure SetParent(AParent: TWinControl); virtual.


 
Ega23 ©   (2007-10-08 14:30) [3]

SetParent у фрейма - не хочется.
SetParent у моего контрола - не отрабатывает в нужное мне время, т.к. для него парентом является сам фрейм и он (парент) не меняется.


 
Ega23 ©   (2007-10-08 14:32) [4]


> Уже начиная с TControl имеется procedure SetParent(AParent:
>  TWinControl); virtual.


Фрейм набивается в Design-Time, там и парент назначается.
Ну , в смысле, парент у моего контрола появляется автоматом после создания самого фрейма.
А вот когда я этому фрейму паретн назначу - это уже моё дело. Вот и хочу поймать на уровне контрола, лежащего на панели, лежащей на фрейме отловить факт назначения фрейму парента.


 
Ega23 ©   (2007-10-08 14:45) [5]

Перекрытие CreateWnd/DestroyWnd тут не подойдёт?


 
evvcom ©   (2007-10-08 18:00) [6]

CreateWnd/DestroyWnd здесь похоже подойдет. Надо пробовать.
Сначала у меня другая идея возникла. Но она, видимо, хуже.
А в целом не нравится мне эта затея. На кой твоему компоненту момент изменения парента фрейма? Что-то не туда ты пытаешься сделать, имхо. Ведь родитель имеет полное право свое дитя отлучить от себя или вообще прибить. И что тогда? Попробуй осмыслить свою задачу и поискать другие пути решения.



Страницы: 1 вся ветка

Текущий архив: 2007.10.28;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
2-1190980483
foreverDelphi
2007-09-28 15:54
2007.10.28
как написать компонент видимый за пределами формы


11-1174741130
ElectriC
2007-03-24 15:58
2007.10.28
Ошибка KOL


11-1174595095
ElectriC
2007-03-22 23:24
2007.10.28
размер KOL


4-1177599496
ffo_2
2007-04-26 18:58
2007.10.28
Как получить имя этого компонента?


15-1190990492
chief
2007-09-28 18:41
2007.10.28
CommSQ - ищу программистов для реализации OpenSource-проекта