Форум: "Компоненты";
Текущий архив: 2007.10.28;
Скачать: [xml.tar.bz2];
Вниз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 вся ветка
Форум: "Компоненты";
Текущий архив: 2007.10.28;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.041 c