Delphi教程—网络编程技术.ppt

CloseWriteBuffer 形式：procedure CloseWriteBuffer(); 含义：关闭写缓冲区 Disconnect 形式：procedure Disconnect(); 含义：用于断开与对方计算机的连接 FlushWriteBuffer 形式：procedure FlushWriteBuffer(const AByteCount: Integer); 含义：发送自调用OpenWriteBuffer以来的所有缓冲区数据到对方计算机，并随后清空缓冲区 ReadBuffer 形式：procedure ReadBuffer(var ABuffer; constAByteCount:Longint); 含义：从Indy的接收缓冲区中读取的字节数 ReadStream 形式：procedure ReadStream(AStream:TStream;AByteCount:LongInt;const AreadUntil Disconnect :Boolean); 含义：从Indy缓冲中读取数据并存储在AStream参数指定的目的流中 WriteBuffer 形式：procedure WriteBuffer(const Abuffer; AByteCount:LongInt;const AwriteNow:Boolean) 含义：用于向对方计算机发送数据，数据被写往Indy缓冲区或者直接发送给对方 WriteStream 形式：Procedure WriteStream(AStream:Tstream; const AAll:Boolean;const AWriteByteCount: Boolean; const ASize:Integer); 含义：用于发送一个对象流 (3)TIdTCPClient组件的事件介绍 OnStatus事件：是一个TidSatusEvent类型的时间句柄，在当前连接状态改变时被触发 2．TIdTCPServer组件 　　TIdTCPServer组件位于Indy Servers组件板如图所示，TIdTCPServer组件封装了一格完整的多线程TCP服务器。TIdTCPServer使用一个或多个线程来监听客户连接。通过TidThreadMgr对象的关联，为每一个连接到服务器的客户链接分配一个独立的线程。TIdTCPServer允许配置服务器监听线程，包括默认端口、监听队列、最大连接数等。 　　 TIdTCPServer组件实现了两套机制来链接线程提供服务。第一种方法利用响应事件句柄的方法来处理客户链接。第二种方法使用TidCommandHandler对象来辨认合法的服务命令，提供一些方法和属性来处理参数，执行动作，表述正确或者错误的响应。 (1)TIdTCPServer组件的属性介绍 Active属性：用于指出TIdTCPServer的当前状态 Bindings属性：为TCP服务器提供默认端口号，并被TidListenerThread 对象用来获取对Socket句柄的访问和由TCP/IP协议栈提供的底层方法 图11-5 IdTCPServer组件 DefaultPort属性：指明了其监听新的客户端链接请求的端口号 Greeting属性：当客户端链接请求被监听线程接收时，Greeting中包含了被发往客户端的欢迎信息 ListenQueue属性：用来为监听线程指明可允许的、未处理的链接请求数目 Threads属性：包含了在监听线程中创建的线程列表 LocalName属性：标识了用户计算机系统的主机名 (2)TIdTCPServer组件的过程和方法介绍 BeginWork 形式：Procedure BeginWork(AWorkMode:TWorkMode;const Size:Integer); 方法：用于触发OnBeginWork事件，同时维护读/写堵塞操作的数量，以及初始读写操作的大小信息 DoWork 形式：procedure DoWork(AWorkMode:TWorkMode;const ACount:Integer); 方法：用于触发OnWork事件。在调用DoWork过程之前必须调用BeginWork过程，否则DoWork过程将不产生任何效果。 EndWork 形式：procedure EndWork(AWorkMode:TWorkMode); 方法：EndWork过程用于触发OnEndWork事件。EndWork上可以嵌套调用，但是on EndWork事件仅在第一次调用时触发 (3)TIdTCPCServer组件的事件句柄介绍 OnConnect事件：在客户线程试图连接到TCP服务器时触发 OnDisconnect事件：在客户线程试图断开与TCP服务器时触发 OnEx