Главная страница
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.049 c
2-1174377014
DimonS
2007-03-20 10:50
2007.04.08
Имя пользователя из-под Delphi


2-1174394894
Alex_C
2007-03-20 15:48
2007.04.08
Длина поля Caption для TForm


2-1174042128
usik
2007-03-16 13:48
2007.04.08
как прикрепить изображение в Database Desktop-Paradox 7


2-1173854350
Wood
2007-03-14 09:39
2007.04.08
TADOCommand


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