Главная страница
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.066 c
2-1173951345
Quelle
2007-03-15 12:35
2007.04.08
Из шестнадцатиричного формата в текст


15-1173127854
Petr V. Abramov
2007-03-05 23:50
2007.04.08
"Марш несогласных"


9-1147122419
Nobody_1988
2006-05-09 01:06
2007.04.08
TBitmaps


15-1174029562
Alkid
2007-03-16 10:19
2007.04.08
Goran Bregovic, песня Kalashnikov


15-1173766242
koha
2007-03-13 09:10
2007.04.08
У кого с английским хорошо - помогите перевести