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

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

Создание компонент [D3, D4, D5, D6, Win95/98, WinME, NT4, Win2k, WinXP]


LazorenkoX ©   (2002-03-29 11:02:00) 

Я создаю компоненту (TWinControl), которая будет размещятся на форме. Как мне узнать Handle, Caption и тд. этой формы, или, если проще, как мне использовать свойства парэнтной TForm?


Alx2   (2002-03-29 13:17:00) [1]

>Юрий Зотов © (29.03.02 12:56)
Как говорится, зри в корень :))


Юрий Зотов   (2002-03-29 12:56:00) [2]

Ох, братцы, ну что за советы?

А если юзер компонента бросит его, скажем, на панель? Или в группу? Кранты будут, однако...

А надо просто вызвать GetParentForm(Self). И все.


MBo   (2002-03-29 12:37:00) [3]

кстати, если родителем всегда будет форма, то удобно ввести поле
FParent:TForm;


Alx2   (2002-03-29 12:32:00) [4]

Эти свойства так и называются: Handle, Caption.
Пусть TWinControl размещаем на "чужой" форме Form1.
Тогда Form1.Handle даст то, что нужно.
Если aWinControl:TWinControl уже размещен, но неизвестно где, то можно узнать интересующее так:
if aWinControl.Parent is TForm then
with aWinControl.Parent as TForm do
Begin
<...> := Handle;
<...> := Caption;
End;


MBo   (2002-03-29 12:19:00) [5]

Parent.Handle и т.д.
если свойства, специфичные для формы, то
TForm(Paren).***


Наверх

Титульная страница Поиск, карта сайта Написать письмо