TPanel Class Name

Hello,

Somebody knows if its possible to change the ClassName of
a component like TPanel?

I tried

type
  pnClock = class(TCustomPanel)
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  end;

  TForm1 = class(TForm)

implementation

{$R *.dfm}

procedure pnClock.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.WinClassName := 'MyClass';
end;

But no success, using some tools that shows de classname of a window
it still being TPanel...

Its possible? How?

Best Regards,
Carlos

--