Adding new component to pallete

I see I wasn't completely clear on my previous reply and I mixed up my "attempts".

In my first attempt, I did exactly what you indicated:
I read and understood the code you posted.
Declare the class TEditJD = class(TWebEdit), and descend TWebEditJD from TEditJD. Then register TWebEditJD.
The problem I had with this is that the compiler fails with an error. It says that TEditJD is a duplicate identifier. It does not install. The screenshot in this reply and the code is for this attempt 1.

That is why I did the subsequent attempts inserting a "p". (it stands for spanish "Prueba").
Made other attempts with interesting results.
I will keep trying until I crack the code and post it when done.