[peresmeshnik]

Код:

unit MyPanel;

:::::::
:::::::
type
TMyPanel = class (TPanel)

private
FCBox : TComboBox;
:::::::::
:::::::::
constructor TMyPanel.Create(AOwner:TComponent);

published
 
property CBox : TComboBox read FCBox;

end;

procedure Register;

implementation

constructor TMyPanel.Create(AOwner:TComponent);

begin
inherited Create(AOwner);
Height:=58;
Width:=170;

FCBox:=TComboBox.Create(Self);
FCBox.Parent:=Self;
FCBox.Top:=6;
FCBox.Left:=8;

end;
end.

lmikle: пользуемся тегами!!!