При создании своего компонента ругается на его размеры

← →
Aleksandr © (2004-03-22 17:38) [0]

Создаю компонент от TWinControl:

inherited Create(AOwner); ControlStyle := ControlStyle - [csSetCaption]; FCodeEdit:=TEdit.Create(Self); FCodeEdit.Parent:=Self; FShowExtChars:=true; Width := 200; Height := 22; ...

SetBounds оверриднут для установки размеров компонент-свойств этого компонента - TEdit"ов:
inherited SetBounds(ALeft, ATop, AWidth, AHeight); FCodeEdit.Left:=2; FCodeEdit.Width:=45 ...

И в дизайн-тайме при попытке воткнуть такой компонент на форму Делфи сообщает, что компонент "" не имеет парента. А не задашь, так и не увидишь его - все с нулем задаст.

← →
MBo © (2004-03-22 17:42) [1]

В перекрытом CreateWnd работай с Edit-ами

← →
Aleksandr © (2004-03-22 17:48) [2]

Что конкретно с ними делать в нем? Создавать или присваивать размеры?

← →
MBo © (2004-03-22 18:04) [3]

Присваивать размеры

← →
WebErr © (2004-03-22 18:08) [4]

> Делфи сообщает, что компонент "" не имеет парента

Ещё бы он был!

> FCodeEdit.Parent:=Self;

Self - это там сам компонент!!! :))))

Я понимаю, что сам компонент. А что? Он же ими должен управлять.

> Он же ими должен управлять.

Ты про что?

При создании своего компонента ругается на его размеры Найти похожие ветки