ActiveX form的简单问题!!!!!!!!!!!!!!!!!!!!!!!

                            
   
  我在一个ActiveX   form   工程中    
   
  在菜单中   ->   edit   ->   add   to   interface    
   
  然后在     interface   下拉框中选   Events-leventEvents  
   
  在   Declaration   中   输入   procedure   g(var   i   :integer);     声明了带一个参数事件过程  
   
   
  但不知道如何引发该事件????  
   
   
    例如:    
   
        当变量   i   大于   50   时   就引发   上面定义的事件   并将   i   作为   事件的参数    
   
   
  部分代码如下:  
   
  //按下activex控件的按钮  
   
  procedure   TActiveFormX.Button1Click(Sender:   TObject);  
   
   
  begin  
      //如果I大于50就激发G()事件  
   
            if   i   >   50   then  
              g(i)  
            else  
              i:=i+1;  
   
   
  end;  
   
   
  但在编译时报错,说g(i)没有定义         ,  
   
  但type   library里在IActiveFormXEvents项中可以看见g事件过程,参数也正确  
   
   
  请各位高手帮忙解决,谢谢!!!!!!!  
 

查看回复