大家好是這樣的。我想請教大家一個問題。在delphi中實作埠的復用
我在網上找到了一段代碼
Var
pEnt:PHostEnt;
IPad: string;
//埠復用
sobinyshuai : bool;
myIP : PChar;
PORT : integer;
ServerSocket : TSocket;
SockAddrIn: TSockAddrIn;
WSAData: TWSAData;
begin
myIP:='192.168.2.107' ;
PORT:=1980;
SobinyShuai:=true;
WSAStartUp(MakeWord(1, 1),WSAData);
ServerSocket := WSASocket(AF_INET, SOCK_STREAM, IPPROTO_TCP, NIL, 0, 0); {建造一個TCP的socket。}
setsockopt(ServerSocket, SOL_SOCKET, SO_REUSEADDR, @sobinyshuai, sizeof(sobinyshuai));{允許埠重用}
SockAddrIn.sin_family := AF_INET;
SockAddrIn.sin_addr.s_addr:=inet_addr(myIP);
SockAddrIn.sin_port := htons(Port); {設定這個連接的埠}
Bind(ServerSocket, SockAddrIn, SizeOf(SockAddrIn));{設定ServerSocket的屬性吧,應該這樣理解}
Listen(ServerSocket, 1); {設定監聽,等待連接。在Accept前只接受一個連接}
end;
這一段代碼可以實作埠的利用,但是我試了沒有成功
我想請教一下,上面代碼中的myIP指的IP地址是內網的IP地址還是外網的IP地址
里面的PORT埠是批的要本機的埠嗎?
還有是主是這一端代碼要加在什么位置。
如果有這方面的代碼可以給我發一個謝謝
uj5u.com熱心網友回復:
192.168,這是內網的,其實和內外無關,只要ip可以訪問就可以轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/76037.html
標籤:網絡通信/分布式開發
上一篇:如何截取訊息
