activeX的难题

[fwtandpj]

我在delphi里创建了一个Activex控件，但在对外发布的时候不想保留原有的事件和一些属性。我修改程序的代码，删除published部分，可以编译，但注册时程序有自动恢复了，如何才能屏蔽掉TOleControl下的事件呢？
TRSFunctionFrame = class(TOleControl)
private
FIntf: IFunctionFrame;
function GetControlInterface: IFunctionFrame;
protected
procedure CreateControl;
procedure InitControlData; override;
public
property ControlInterface: IFunctionFrame read GetControlInterface;
property DefaultInterface: IFunctionFrame read GetControlInterface;
published
property Anchors;
property TabStop;
property Align;
property DragCursor;
property DragMode;
property ParentShowHint;
property PopupMenu;
property ShowHint;
property TabOrder;
property Visible;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnStartDrag;
end;

[clasj]

很遗憾的告诉你，我问了很就都没有解决！
http://community.csdn.net/Expert/topic/4323/4323314.xml?temp=.4974634