Komponente wird nicht richtig registriert

[Nalincah]

Kann mir jemand sagen wo hier der Fehler liegt?
Es wird alles kompiliert, und installiert, aber ich finde die Komponente einfach nicht. Es wird noch nicht mal die Registerkarte "Rave Compos" erstellt

Delphi-Quellcode:

unit PanelVerschieben;

interface

uses Classes, ADODB, db, ExtCtrls, StdCtrls, SysUtils, Controls;


//------------------------------------------------------------------------------
//------------------------------------------------------------------------------
type TPanelVerschieben = Class(TPanel)
  private
    procedure MyOnPrint;
    procedure Sortieren(Panel:TPanel);
    procedure LabelVerschieben(Panel:TPanel);
  public
    constructor Create(AOwner:TComponent);override;
  end;
//------------------------------------------------------------------------------
procedure Register;
//------------------------------------------------------------------------------
implementation
//------------------------------------------------------------------------------
constructor TPanelVerschieben.Create(AOwner:TComponent);
begin
  inherited Create(aowner);
//  Self.OnPrint      := Self.MyOnPrint;
end;
//------------------------------------------------------------------------------
procedure TPanelVerschieben.Sortieren(Panel:TPanel);
begin
  // Irgendein Code
end;

//------------------------------------------------------------------------------
procedure TPanelVerschieben.LabelVerschieben(Panel:TPanel);
begin
  // Irgendein Code
end;
//------------------------------------------------------------------------------
procedure TPanelVerschieben.MyOnPrint;
begin
  // Irgendein Code
end;
//------------------------------------------------------------------------------
procedure Register;
begin
  RegisterComponents('Rave Compos', [TPanelVerschieben]);
end;
//------------------------------------------------------------------------------
end.