动态DLL中使用socket出现不能OnRead不能被执行。求解决方法

网上de坏人 2016-01-04 08:28:28
求个解决方案。。。DLL封装socket后。发现onread不能执行!而且当EXE发来信息后不执行onread函数。。

constructor TConnection.Create;
begin
inherited;
ClientSocket := TClientSocket.Create(nil);
ClientSocket.Host := '127.0.0.1';
ClientSocket.Port := 10095;
ClientSocket.ClientType := ctNonBlocking;
ClientSocket.OnRead := csocketRead;
ClientSocket.Active := True;
FsSocket := ClientSocket;
end;


procedure TConnection.csocketRead(Sender: TObject; Socket: TCustomWinSocket);
begin
OutputDebugStringA(PChar('123123123123123'));
end;

...全文
587 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
Andy-88 2016-01-12
  • 打赏
  • 举报
回复
真的不执行吗,你设置的是串行还是并行,这个会堵塞吗
网上de坏人 2016-01-05
  • 打赏
  • 举报
回复
引用 1 楼 linuxpingwangping 的回复:
你要确定服务器端发数据给客户端了吗?
肯定了。。。我这有日志 返回的。。
网上de坏人 2016-01-05
  • 打赏
  • 举报
回复
而且我把同样的客户端代码重新弄个EXE放进去就可以触发onread事件
  • 打赏
  • 举报
回复
你要确定服务器端发数据给客户端了吗?

1,593

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧