| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Получить имя родителя [D7, WinXP]

Dreamse ©   (2007-02-11 10:15:00) 

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

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

---

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

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

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

---

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

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

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

---

Kolan   (2007-02-11 14:03:00) [3]

if Sender is TTabSheet then
 ((Sender as TControl).Parent as TTabSheet).Caption := 'sss'
else
 ShowMessage(Sender.ClassName);
Так?

---

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

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

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

---

Loginov Dmitry   (2007-02-11 13:26:00) [5]

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

---

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

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


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


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

---

Loginov Dmitry   (2007-02-11 10:54:00) [7]

TControl(Sender).Parent.Name;

---

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

(Button.Parent as TPageControl).Name

---

Наверх