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

Получить имя родителя   Найти похожие ветки 

 
Dreamse   (2007-02-11 10:15) [0]

Как получить имя родителя ? Например при нажатии на кнопку определить имя закладки PageControl на которой находиться кнопка.

Компонент не обязательно должен быть кнопкой. Это может быть любой другой компонент


 
Dmitrij_K   (2007-02-11 10:41) [1]

(Button.Parent as TPageControl).Name


 
Loginov Dmitry ©   (2007-02-11 10:54) [2]

TControl(Sender).Parent.Name;


 
Action   (2007-02-11 13:16) [3]

Понятно, не подскажите как можно обратиться к свойству родителя ?
Мне нужно изменить свойство Caption из предка


(TControl(Sender) as TTabSheet).Caption :=


Код к сожалению не проходит. Понять не могу.
Кнопка ( или там панель ) располоденна на TTabSheet


 
Loginov Dmitry ©   (2007-02-11 13:26) [4]

(TControl(Sender).Parent as TTabSheet).Caption :=


 
Action   (2007-02-11 13:59) [5]

> Loginov Dmitry ©   (11.02.07 13:26) [4]

Выдаёт ошибку :  Invalid Class typecast :(


 
Action   (2007-02-11 14:03) [6]

> Loginov Dmitry ©   (11.02.07 13:26) [4]

Всё верно, моя ошибка ! Спасибо всем


 
Kolan ©   (2007-02-11 14:03) [7]

if Sender is TTabSheet then
 ((Sender as TControl).Parent as TTabSheet).Caption := "sss"
else
 ShowMessage(Sender.ClassName);

Так?


 
Action   (2007-02-11 14:04) [8]

> Kolan ©   (11.02.07 14:03) [7]

Спасибо. Уже встевил проверку !



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

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



Память: 0.46 MB
Время: 0.025 c
3-1169124696
ildarkh
2007-01-18 15:51
2007.04.08
Обмен большими данными между Oracle и FireBird


6-1161702620
-Sirian-
2006-10-24 19:10
2007.04.08
Set-Cookie


15-1173794839
novill
2007-03-13 17:07
2007.04.08
Гостевую специально отключили?


11-1152777666
oleg_l_k
2006-07-13 12:01
2007.04.08
Backup для БД на FireBird 1.0 (KOLIBServ)


2-1173896890
Malik
2007-03-14 21:28
2007.04.08
Проблема с Delphi




   Наверх