Procedure used to register the components.
Source position: comctrls.pp line 3900
procedure Register;