Главная страница
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.048 c
2-1174044399
Vas
2007-03-16 14:26
2007.04.08
Столбци


2-1174147480
vegarulez
2007-03-17 19:04
2007.04.08
Как отловить нажатие кнопки минуса.


3-1169045274
PEAKTOP
2007-01-17 17:47
2007.04.08
Функция UPPER в Firebird v2.0


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


15-1174076530
Чапаев
2007-03-16 23:22
2007.04.08
Это что?