大家看一下udpserver的OnUDPRead事件 ( 积分: 40 )

  • 主题发起人 主题发起人 gigglegile
  • 开始时间 开始时间
G

gigglegile

Unregistered / Unconfirmed
GUEST, unregistred user!
1:我写了一个单元(unit1),定义了一个控件(TMyControl),从TIdUDPServer继承,
2:然后写了一个过程 procedure TMyControl.MyUDPOnRead(Sender:TObject;AData:TStream;ABinding:TIdSocketHandle);
3:我在另外一个单元(unit2)中调用这个过程:
CtrlServer:=MyControl.Create(nil);
CtrlServer.Active:=true;
CtrlServer.OnUDPRead:=CtrlServer.MyUDPOnRead;
4:我再将unit1和unit2封装成dll文件
5:我用一个程序来测试这个dll的时候,总是不能执行MyUDPOnRead这个过程;
请问是什么原因啊??是不是定义有错误??
 
ft!
nobody???
 
yun a !
自己顶自己的!
 
后退
顶部