Наследование от класса TCustomControl

[Kotlyar562]

Нужно описать класс TDot, который имеет визуальные свойства. Хотел сделать его наследником TCustomControl. А проблема в том, что нельзя добавить новые поля.

type
  TDot = class (TCustomControl)
    name1: string;
    constructor create(x,y:integer);
  end;

Пишет,

[Warning][Error] UImage.pas(13): Field definition not allowed after methods or properties
[Error] UImage.pas(13): Published field 'name1' not a class nor interface type

В чем тут проблема? И как сделать, чтобы добавить новые поля?

[Kotlyar562]

Осенило, нужно объявлять поле в разделе public или каком-то другом