Вниз
Скачать: CL | DM;

Узнать название родителя у родителя виз. комп.   Найти похожие ветки 

← →
Layner ©   (2005-11-10 23:01) [0]

Возможно ли, есть грид, он лежит на TGroupBox, TGroupBox лежит на TPanel, TPanel лежит на TFrame. TFrame в свою очередь лежит на TForm. ну и вот :) хочу узнать из Грида, на каком же фрейме он лежит.. А именно название фрейма.
Поясню, для чего мне это надо. Если я делаю фрейм, кидаю на него компанент (грид, панель..), этот компанент одинакого будет именоваться во всех фреймах. Бог бы с ним, так вот сохранение (в ini или реестр не важно) параметров (ширина колонок, сортировка..) грида у меня завязанно на его названии. В итоге получается, что в ini или реестр сохраняется как бы один грид, хотя на самом деле, они просто все сохр. друг на друга... Вот хотелось бы узнать "дедушку" компанента :/ Заранее благодарю за люой совет.


← →
Layner ©   (2005-11-10 23:12) [1]

Т.е. "папа" такой:
=grid.Parent.Name
Родительская форма такая:
GetParentForm(self).Name
А как вот распутать на одно колено вниз чем grid.Parent.Name, вопрос...


← →
Silver... ©   (2005-11-10 23:58) [2]

рекурсивно ессно


← →
Digitman ©   (2005-11-11 08:55) [3]


> хочу узнать из Грида, на каком же фрейме он лежит.. А именно название фрейма
> ..
> хотелось бы узнать "дедушку" компанента


Это уже не "дедушка" будет, а "прадедушка" ..

Имя_фрейма := Grid.Parent.Parent.Parent.Name

здесь :

1-й Parent вернет ссылку на GroupBox, это - "отец"

2-й Parent вернет ссылку на Panel, это "отец" для GroupBox и "дед" для Grid

3-й Parent вернет ссылку на Frame, это "отец" для Panel, "дед" для GroupBox и "прадед" для Grid


← →
Layner ©   (2005-11-11 11:01) [4]

Digitman ©   (11.11.05 08:55)
Спасибо большое! точно, до меня не дошло. :)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
14-1132336814
Separator
2005-11-18 21:00
2005.12.11
Антивирусники


1-1132049770
guru-guru
2005-11-15 13:16
2005.12.11
Окраска ячейки в ListView


14-1132484150
Separator
2005-11-20 13:55
2005.12.11
try ... except


1-1132124995
DEMs
2005-11-16 10:09
2005.12.11
Компонент TVirtualStringTree


1-1131803201
Dmitrich
2005-11-12 16:46
2005.12.11
Мышка




   Наверх