大侠请帮忙，dll里面调用ocx,ocx的事件不回响应，(0分)

代码如下:
var
M : TMethod;
begin
goOcx:= TMyOcx.Create(nil);
M.Code :=@StateChangedEvent;
M.Data :=goOcx;
goOcx.OnStateChanged :=TStateChanged(m);
end;