HyperButtons bzw HyperPanels erstellen (Delphi Anfänger)

[Flashco]

Das Problem ist Folgendes: Ich weiß nicht wie ich das Panel, das ich in Unit2 erstellt habe, als "OnCreate" in Unit1 schreiben kann. Ebenso Fehlt mir das Wissen, diesem Panel dann gewünschte Befehle zuzuweisen wie einem Button. Von "Klasse in der IDE registrieren" habe ich jezt auch das erste mal gehört und weiß damit leider nichts anzufanegn

Unit1

Code:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls,Unit2;

type
  TMain = class(TForm)
    THyperPanel:TPanel;
    PnTestpanel: TPanel;
    BtCLose: TButton;
    procedure THyperPanelCreate(Sender: TObject);
    procedure BtCLoseClick(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Main: TMain;
  
implementation

{$R *.dfm}

procedure THyperPanelCreate(Sender: TObject);
  begin
    TMain.Create.THyperPanel; override;
  end;

procedure TMain.BtCLoseClick(Sender: TObject);
begin
close;
end;

end.

Unit2

Code:

unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls;
type
 THyperPanel = class ( TPanel)
   public
     constructor Create(AOwner:TComponent);override;
{     procedure HyperPanelClick;}
  end;

implementation

constructor THyperPanel.Create(AOwner: TComponent);
BEGIN
    inherited Create(AOwner);
    Width := 100;
    Height := 100;
    Caption:='Hyper Button';
    ParentColor:= False;
    Color:= clLime;
    BorderStyle:= bsSingle;
    BevelWidth:=3;
end;

 { Procedure TMain.HyperPanelClick (Sender: TObject);
  begin
    close;
  end;}

end.