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

Delphi Sources



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

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 27.08.2012, 14:48
Аватар для Lost_Fish
Lost_Fish Lost_Fish вне форума
Начинающий
 
Регистрация: 21.07.2011
Адрес: Новосибирск
Сообщения: 103
Версия Delphi: Delphi 7,XE2
Репутация: выкл
По умолчанию Вопрос по переопределению конструктоора

Создаю свой компонент

Код:
    TRadioButtonCorrect=class(TRadioButton)
    private
        FBitmap:TBitmap;
        FLeftMove:Integer;
        FTopMove:Integer;
        procedure WMPaint(var Message: TWMPaint);message WM_PAINT;
        procedure AfterCreate(var Msg:TMessage);message WM_User+1001;
    public
        constructor Create(AOwner:TComponent);Override;
        destructor Destroy;Override;
    end;

переопределяю конструктор так

Код:
constructor TRadioButtonCorrect.Create(AOwner: TComponent);
begin
    inherited Create(AOwner);
//    Parent:=TWinControl(Owner);
    FLeftMove:=16;
    FTopMove:=2;
    PostMessage(Handle,WM_User+1001,TForm(AOwner).Color,0);
end;

если ставлю Parent:=TWinControl(Owner); то получаю привязку компонента к форме, если вообще без этой строчки то получаю ошибку о том что нет родителя у компонента

Мне нужно чтоб Parent был GroupBox или Panel или ещё что, то на что я кинул в дизайнере этот компонент

Подскажите как это сделать
Ответить с цитированием
 


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

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