怎么样在DLL中封装SOCKET客户端?(1分)

  • 主题发起人 主题发起人 dangde
  • 开始时间 开始时间
D

dangde

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么样在DLL中封装SOCKET客户端?我现在要在DLL中封装一个SOCKET的客户端,请问下该怎么样实现呢? 其中的 ONERROR 怎么处理呢?
 
在DLL中加个窗体啊,在窗体上放置SOCKET控件不行么?这样就可以不用动态创建了。<br><br>或者<br>type<br> &nbsp;TMyErrorEvent = class(TObject)<br> &nbsp; &nbsp;procedure ClientSocketError(Sender: TObject;<br> &nbsp; &nbsp; &nbsp;Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;<br> &nbsp; &nbsp; &nbsp;var ErrorCode: Integer);<br> &nbsp;end;<br><br>procedure TMyErrorEvent.ClientSocketError(Sender: TObject;<br> &nbsp;Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;<br> &nbsp;var ErrorCode: Integer);<br>begin<br> &nbsp;{...}<br>end;<br><br>procedure CreateClientSocket;<br>var<br> &nbsp;MyErrorEvent: TMyErrorEvent;<br> &nbsp;tmpClientSocket: TClientSocket;<br>begin<br> &nbsp;tmpClientSocket := TClientSocket.Create(nil);<br> &nbsp;tmpClientSocket.OnError := MyErrorEvent.ClientSocketError;<br> &nbsp;{...}<br>end;
 
我已经实现了,DELPHI自己写的SOCKET自己都抛弃了,看来这个SOCKET的确不好。于是我用API来写,效率高多了, 放在DLL里面, 真的不错。
 
好,等我要用的时候我找你要。
 
后退
顶部