Скачать: CL | DM;

Parent = TPanel   Найти похожие ветки 

← →
DevilDevil ©   (2006-10-26 13:31) [0]

Достаточно странная ошибка. Как ужа, наверное, многим известно :), я пишу компонент-таблицу. При попытке поместить мой компонент на Панели, таблица помещается на Форме... причём с теми координатами Left,Top , с которыми таблица была брошена на панель... Конструктор примерно следующий:

constructor TInfoTable.Create(Owner: TComponent);  
begin
 inherited Create(Owner);
 Parent := Owner; // <-- без этой строки тоже ошибки какие-то были
. . .
end;


P.S. компонент унаследован от TCustomControl

---

← →
MBo ©   (2006-10-26 13:38) [1]

А если параметр назвать AOwner?

---

← →
DimaBr   (2006-10-26 14:09) [2]

> Parent := Owner;

SetParent;override;

---

← →
DrPass ©   (2006-10-26 19:46) [3]

> Parent := Owner; // <-- без этой строки тоже ошибки какие-
> то были

Вот из-за этой строки оно и попадает на форму. Оставь Parent дизайнеру

---

← →
StriderMan ©   (2006-10-27 09:12) [4]

> // <-- без этой строки тоже ошибки какие-то были

выясни в чем заключаются оибки. скорее всего где-то происходит обращение к Parent, а он еще nil;

---

← →
Наиль ©   (2006-10-27 09:42) [5]

> выясни в чем заключаются оибки. скорее всего где-то происходит
> обращение к Parent, а он еще nil;

Иногда исправляется изменением строчек вида
MyProperty:=...
на
FMyProperty:=...

---

← →
DevilDevil ©   (2006-10-27 15:46) [6]

Спасибо. Я "исправил".
Ошибки раньше возникали из-за того, что в конструкторе я использовал Handle моего компонента. По совету коллег, оформил обращение так:
if HandleAllocated then GetScrollInfo(Handle,SB_HORZ,&Info);

Сдаётся мне, всю строку вообще можно закомментитровать... но дело то не в этом, вроде нормально работает.

Так вот... а раз это ошибку не вызывает, то и Parent := Owner; можно убрать. Что я, собственно, и сделал. Компонент кидается нормально.

Всё равно спасибо.

Сейчас начал другой прстенький компонент... опять проблема. Но для этого создам другой топик.

---

← →
Percent   (2006-10-29 16:53) [7]

Так вот... а раз это ошибку не вызывает, то и Parent := Owner; можно убрать. Что я, собственно, и сделал

А [1] прочитать не судьба...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c