各位帮个忙呀，我做的这个控件（只能输入数字的），安装后怎么不显示在控件面板上呀

[wangyansurmount]

unit QNumberEdit1;

interface

uses
Windows, Messages, SysUtils, Classes, QControls, QStdCtrls;

type
TNumberEdit2 = class(TEdit)
private

{ Private declarations }
protected
procedure KeyPress(var Key:Char);override;
{ Protected declarations }
public
{ Public declarations }
published
{ Published declarations }
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents('NumberEdit2', [TNumberEdit1]);
end;
procedure TNumberEdit1.KeyPress(var Key:Char);
begin
inherited KeyPress(Key);
if not (key in ['0'..'9']) then
key:=#0;

end;

end.