Создание компонент

← →
LazorenkoX (2002-03-29 11:02) [0]

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

← →
MBo © (2002-03-29 12:19) [1]

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

← →
Alx2 © (2002-03-29 12:32) [2]

Эти свойства так и называются: 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:37) [3]

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

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

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

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

Создание компонент Найти похожие ветки