[Friedrich]

Я пишу свой компонент, наследник панельки. В конструкторе моего компонента я хочу породить едит и поставить на панельку. Пожалуйста подскажите что не так.

Код:

unit MyPanel;

interface

uses
  Windows, SysUtils, Classes, Graphics, Forms, Controls, Menus,
  StdCtrls, Dialogs, Buttons, Messages, ExtCtrls, ComCtrls, StdActns,
  ActnList, ToolWin, ImgList, Grids;

type
  TMyPanel = class(TPanel)
  private

    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
  published
    { Published declarations }
    constructor Create(aowner:Tcomponent);override;

  end;
var
  Edit1:TEdit;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('MyComponents1', [TMyPanel]);
end;

constructor TMyPanel.Create(aowner:Tcomponent);
begin
inherited create(Aowner);
 Edit1:=TEdit.Create(Self);
 Edit1.Parent:= MyPanel;
end;
end.

Ошибка в

Код:

Edit1.Parent:= MyPanel; 

Но как без неё? нужно чтоб едит отображался на понельке.

[Friedrich]

Вопрос снят, решение уже нашёл Edit1.Parent:=Self; извиняюсь