Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.04.08;
Скачать: 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 вся ветка

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

Наверх




Память: 0.48 MB
Время: 0.035 c
15-1173706791
Ega23
2007-03-12 16:39
2007.04.08
А вот нафига нужен xor?


15-1173902441
eXPell
2007-03-14 23:00
2007.04.08
От нечего делать....


1-1171042308
solo777
2007-02-09 20:31
2007.04.08
Рисование на канве


15-1173882328
eXPell
2007-03-14 17:25
2007.04.08
Как бы вы поступили?


15-1173983756
Shmit
2007-03-15 21:35
2007.04.08
бизнес-планирование на Delphi