Delphi Open Tools Api实例研究（一）[8]

    imageindex1:integer;//检测量，请参看后面的代码

    idehandle:hwnd;//存贮ide的handle

  protected

    procedure addmenu;//加入我们的菜单

    procedure removemenu;//卸载我们的菜单

    procedure recodeediter(sender:tobject);//菜单项一的事件

    procedure aboutform(sender:tobject);//菜单项二的事件

  public

    constructor create;

    destructor destroy;override;