Здравствуйте, polar, Вы писали:

P>К тому же мне нужно будет проверять моего предка в конструкторе?
Надо перегрузить

procedure ValidateContainer(AComponent: TComponent); dynamic;

Description
ValidateContainer is called by a component when it is about to be inserted into a container object. By default, ValidateContainer calls the ValidateInsert method of the component specified by the AComponent parameter.

Descendant components can override ValidateContainer to disallow a component from being inserted into specific containers. To disallow an insertion, raise an exception in the derived method.

В конструкторе, по-моему, не нужно ничего делать — все сделается и так.

Здравствуйте!
Такая проблема: я создаю невизуальный компонент, который должен обращаться к свойствам и методам формы на которую я его помещаю. Как мне обратиться к свойствам и методам этой формы из компонента?

Здравствуйте, polar, Вы писали:

P>Здравствуйте!
P>Такая проблема: я создаю невизуальный компонент, который должен обращаться к свойствам и методам формы на которую я его помещаю. Как мне обратиться к свойствам и методам этой формы из компонента?

У любого компонента есть Owner (см. Help).
При его размещении на форме, Owner — это и будет сама форма.

TForm(Owner).Caption:=...

Здравствуйте, mrhru, Вы писали:

M>У любого компонента есть Owner (см. Help).
M>При его размещении на форме, Owner — это и будет сама форма.

А если нужна какая-то другая форма, то прийдется создавать переменную и к ней
в секции published property с каким-то именем

Здравствуйте, oleg_v, Вы писали:

_>Здравствуйте, mrhru, Вы писали:

M>>У любого компонента есть Owner (см. Help).
M>>При его размещении на форме, Owner — это и будет сама форма.

_>А если нужна какая-то другая форма, то прийдется создавать переменную и к ней
_>в секции published property с каким-то именем

Спасибо, oleg_v.
Т.е., я смогу вызывать все методы формы и даже распечатать ее?:

TForm(Owner).Print;

Так я понимаю? Я спрашиваю потому, что здесь у меня нет ни Delphi ни принтера.

Здравствуйте, polar, Вы писали:

P>Т.е., я смогу вызывать все методы формы и даже распечатать ее?:

P> TForm(Owner).Print;

P>Так я понимаю? Я спрашиваю потому, что здесь у меня нет ни Delphi ни принтера.
Ну, в теории — да.

Здравствуйте, Sinclair, Вы писали:

S>Здравствуйте, polar, Вы писали:

P>>Т.е., я смогу вызывать все методы формы и даже распечатать ее?:

P>> TForm(Owner).Print;

P>>Так я понимаю? Я спрашиваю потому, что здесь у меня нет ни Delphi ни принтера.
S>Ну, в теории — да.

Ok.

К тому же мне нужно будет проверять моего предка в конструкторе?