procedure RegisterInitComponentHandler(
ComponentClass: TComponentClass;
Handler: TInitComponentHandler
);