我在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;