首页 > 代码库 > BCB::TClientSocket,TServerSocket控件
BCB::TClientSocket,TServerSocket控件
一,首先服务端开启监听
ServerSocket1->Port=StrToInt(5000);
ServerSocket1->Active=true;
ServerSocket1控件,响应ServerSocket1Listen事件;
二,创建连接
ClientSocket1->Address="127.0.0.1";
ClientSocket1->Port=StrToInt(5000);
ClientSocket1->Active=true;
ClientSocket1控件,首先响应ClientSocket1Lookup事件;
ClientSocket1控件,然后相应ClientSocket1Connecting事件;(如果连接服务器出错,则ClientSocket1Error事件处理)。
ClientSocket1控件,再响应ClientSocket1Connect事件;
ServerSocket1控件,响应ServerSocket1GetSocket事件;
ServerSocket1控件,响应ServerSocket1Acceptt事件;
ClientSocket1控件,再响应ClientSocket1Write事件;
三,客户端发送
ServerSocket1控件,响应ServerSocket1ClientRead事件;这个事件里服务向客户发送认证,由ClientSocket1Read事件接收。
四,事件说明:
ClientSocket1控件,ClientSocket1Read事件接收服务发回的信息。
ClientSocket1控件,再响应ClientSocket1Write事件;
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。