Z zqssoft Unregistered / Unconfirmed GUEST, unregistred user! 2007-07-17 #1 如何用socket api监听本机 5190端口,分别获取其发送和接受到的包字符串在memo1和memo2中。
L lake_cx Unregistered / Unconfirmed GUEST, unregistred user! 2007-07-20 #4 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);
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);