Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Компоненты и классы
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #11  
Старый 18.03.2012, 14:33
Аватар для Cheetos
Cheetos Cheetos вне форума
Прохожий
 
Регистрация: 27.09.2011
Адрес: Тульская область
Сообщения: 18
Версия Delphi: 7
Репутация: 10
По умолчанию

По-ходу разобрался!
После создания вложенного компонента нужно было указать, что он является "подкомпонентом": FTitle.SetSubComponent(true);
Измененный кусок кода - может кому пригодится
Код:
// Создание компонента
constructor TPanInPan.Create(AOwner: TComponent);
begin
  inherited create(AOwner);
  width:=500;
  Height:=300;
  FTitle:=TPanel.Create(Self);
  with FTitle do
    begin
        Width:= 100;
        Align:= alRight;
        BevelOuter:= bvNone;
        TabOrder:= 0;
        Color:=clRed;
        Name:='SubTitle';
        Caption:=Name;
    end;
  FTitle.Parent:=Self;
  FTitle.SetSubComponent(true);
end;
Спасибо всем, кто откликнулся!
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 12:59.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025