Socket Api监听5190端口 ( 积分: 0 )

  • 主题发起人 主题发起人 zqssoft
  • 开始时间 开始时间
Z

zqssoft

Unregistered / Unconfirmed
GUEST, unregistred user!
如何用socket api监听本机 5190端口,分别获取其发送和接受到的包字符串在memo1和memo2中。
 
0 分贴飘过。
 
delphi源码抄给你
FSocket := socket(PF_INET, SOCK_STREAM, IPPROTO_IP);
bind(FSocket, FAddr, SizeOf(FAddr)), 'bind');
listen(FSocket, QueueSize), 'listen');
FClientWinSocket := accept(FSocket, @Addr, @Len);
recv(FClientWinSocket, Buf, Count, 0);
 
后退
顶部