Как созданный класс сделать дочерним классу TForm?

← →
allucard (2007-04-16 10:32) [0]

Доброго времени суток.
Есть трабла.

Есть класс с некоторыми новыми свойствами.
Если этот класс описать внутри класса TForm1 выдаёт запрос:
"Field Form1.NewClass does not have a corresponding component. Remove the declaration"

NewClass - наследник класса TComponent.

Как создать свой класс чтоб он был дочерним у формы или другого обьекта?
(например как TButton у класса TForm когда бросаешь на форму кнопку).
Спасибо.

← →
Kolan © (2007-04-16 10:38) [1]

Как создать свой класс чтоб он был дочерним у формы или другого обьекта?
Зарегистрировать? см. процедуру Register

"Field Form1.NewClass does not have a corresponding component. Remove the declaration"
Помести описание поля в другую секцию, например private.

← →
allucard (2007-04-16 10:43) [2]

> Помести описание поля в другую секцию, например private.

Спасиб. Поместил. Не вылазит.
А что ему не нравилось?

> Как создать свой класс чтоб он был дочерним у формы или
> другого обьекта?
> Зарегистрировать? см. процедуру Register

А иначе. Ну не регистрируя, просто гдето мне кажется поле Owner нужно вбить этот компонент?

← →
Kolan © (2007-04-16 11:11) [3]

> А что ему не нравилось?

Туда куда ты добавил среда добавляет компоненты, брошеные тобой на форму. Соотв она смотрит объявление есть, а «corresponding component»"а нет. Вот и ркгается.

> Ну не регистрируя, просто гдето мне кажется поле Owner нужно
> вбить этот компонент?

Ну как обычно. Объявил:
FMyField: TComponent;
В OnCreate, например, формы:
FMyField := TComponent.Create(Self);
Если это контрол, то не забудь Parent указать&#133

← →
{RASkov} (2007-04-16 11:53) [4]

> А что ему не нравилось?

А не нравилось, то что описанный класс/компонент в неявной секции паблишед, искался в DFM файле, а его там нет...

← →
allucard (2007-04-16 12:11) [5]

> {RASkov} (16.04.07 11:53) [4]

ундерстенд.

← →
{RASkov} (2007-04-16 12:54) [6]

> [5] allucard (16.04.07 12:11)
> ундерстенд.

Это что?

← →
deus krid (2007-04-16 13:07) [7]

2{RASkov}
я так понял, он все понял =) и шлет тебе хвалебные оды
(ундерстенд = understand)

← →
{RASkov} (2007-04-16 13:12) [8]

> [7] deus krid (16.04.07 13:07)
> understand

А-а-а. understand. Промт перевел - Понять. :)

Как созданный класс сделать дочерним классу TForm? Найти похожие ветки