свой собственный класс MediaPlayer'a

[nick17]

Добрый день! Я хочу сделать свой собственный класс, чтобы там был MediaPlayer на Panel, Label, и все это входило в контейнер GroupBox. Я выбрал класс предок TCustomConrol, это нормально? Мне хотя бы описать класс, сделать Constructor(или можно стандартный),и вывести пустую панельку на Form1? пасиба

[psycho-coder]

а не проще ли наследовать от TPanel , и при создании добавлять на него лейблы и медиа плееры?

[nick17]

как это "при создании добавлять на него лейблы и медиа плееры", если можно, Вы не могли бы привести маленький примерчик? TPanel же находится в другой иерархической ветке? Простите, это реально мой первый класс(я раньше модулями писал), но работа не ждет...
Updaped:
все! нашел!

type
TPanelControls = class(TPanel)
constructor Create(AOwner :TComponent); override;
destructor Destroy; override;
private
FEdit :TEdit;
FRadioGroup :TRadioGroup;
FButton :TButton;
........


constructor TPanelControls.Create(AOwner :TComponent);
begin
inherited;
Caption := '';
Width := 8 *18;
Height := 8 *15;
FEdit := TEdit.Create(Self);
FEdit.Parent := Self;
FEdit.Top := 8;
FEdit.Left := 8;
FEdit.Width := 54;
FButton := TButton.Create(Self);
FButton.Parent := Self;
FButton.Top := FEdit.Top;
FButton.Left := FEdit.Left + FEdit.Width + 8;

FRadioGroup := TRadioGroup.Create(Self);
FRadioGroup.Parent := Self;
FRadioGroup.Top := FEdit.Top +FEdit.Height +4;
FRadioGroup.TabStop := True;
FRadioGroup.Left := FEdit.Left;
FRadioGroup.Width := 8 *16;
FRadioGroup.Height := 3 *16;
end;

пасиба всем!!