TidTcpClient总结
TidTcpClient包装了一个完整的TCP客户端,该客户端包括sock支持。该控件是以下客户端控件的父类:
TIdDayTime, TIdEcho, TIdFinger, TIdFTP, TIdGopher, TIdHTTP, TIdNNTP, TIdPOP3, TIdQUOTD,
TIdSMTP, TIdTelnet, and TIdWhois。
属性
property BoundIP: string;
客户端使用的IP地址。
property BoundPort: Integer;
当前连接的本地端口号。
property BoundPortMax: Integer;
当前连接时可以使用的最大本地端口号。
property BoundPortMin: Integer;
当前连接可以使用的最小本地端口号。
property Host: string;
远程主机名。可以是IP地址,也可以是域名。
property Port: integer;
远程主机端口号。
property Intercept: TIdConnectionIntercept;
对连接进行读写操作时插入的中途截取者(插件)。
property IOHandler: TIdIOHandler;
发送和接受数据时的输入输出源(插件)。
property MaxLineAction: TIdMaxLineAction;
当读数据时已经到了最大缓冲区长度时触发的动作(事件处理器)。
property MaxLineLength: Integer;
读取数据时最大缓冲区长度(字节数)。
property ReadTimeout: Integer;
读取数据时的超时事件,单位毫秒。
property Socket: TIdIOHandlerSocket;
连接时所用的socket。
方法
procedure Connect(const ATimeout: Integer = IdTimeoutDefault); virtual;
打开客户端连接。
function ConnectAndGetAll: string; virtual;
打开客户端连接并获取所有的数据。
function AllData: string; virtual;
得到连接中所有的数据。
procedure CancelWriteBuffer;
停止写入数据。
procedure Capture(ADest: TStream; const ADelim: string = '.'; const AIsRFCMessage: Boolean =
True); overload;
procedure Capture(ADest: TStream; out VLineCount: Integer; const ADelim: string = '.'; const
AIsRFCMessage: Boolean = True); overload;
procedure Capture(ADest: TStrings; const ADelim: string = '.'; const AIsRFCMessage: Boolean
= True); overload;
procedure Capture(ADest: TStrings; out VLineCount: Integer; const ADelim: string = '.';
const AIsRFCMessage: Boolean = True); overload;
将连接中的数据读取到特殊的对象中去。
procedure CheckForDisconnect(const ARaiseExceptionIfDisconnected: boolean = true;
const AIgnoreBuffer: boolean = false); virtual;
决定是否关闭连接。
procedure CheckForGracefulDisconnect(const ARaiseExceptionIfDisconnected: Boolean = True);
virtual;
决定是否正常地关闭连接。
function CheckResponse(const AResponse: SmallInt; const AAllowedResponses: array
of SmallInt): SmallInt; virtual;
检查允许的响应中的合法的响应。
procedure ClearWriteBuffer;
清除写缓冲区。
procedure CloseWriteBuffer;
关闭写缓冲区。
function Connected: Boolean; virtual;
当前连接是否可用。
function CurrentReadBuffer: string;
从协议栈中更新缓冲区。
procedure Disconnect; virtual;
关闭连接。
procedure FlushWriteBuffer(const AByteCount: Integer = -1);
写入缓存的数据,并清除写缓冲区。
procedure ReadBuffer(var ABuffer; const AByteCount: Longint);
从读取缓冲区中读取数据。
procedure Write(const AOut: string); virtual;
向连接写入数据。
procedure WriteBuffer(const ABuffer; AByteCount: Longint; const AWriteNow: Boolean = False);
向当前连接写入缓冲数据。
procedure WriteStream(AStream: TStream; const AAll: Boolean = True; const AWriteByteCount:
Boolean = False; const ASize: Integer = 0); virtual;
向当前连接写入流数据。
procedure ReadStream(AStream: TStream; AByteCount: LongInt = -1; const AReadUntilDisconnect:
boolean = false);
从当前连接中读取流数据
TIdTCPClient的几种方法
1、ReadFromStack
原型:function ReadFromStack(const ARaiseExceptionIfDisconnected: boolean; const ATimeout: integer; const AUseBuffer: boolean; ADestStream: TIdBuffer): integer; virtual;
用于判断缓冲区里是否还有数据可读,返回值:Integer - Number of bytes read.
2、CurrentReadBuffer
原型:function CurrentReadBuffer: string;
用于读取Socket数据到缓冲区,注意返回为String类型,如果直接显示该String的数据,对于/0之后的数据可能看不到,因此要读取所有的数据,还必须利用CurrentReadBufferSize()判断该String的长度。
返回值:String - Contents of the Indy buffer.
3、GetResponse
原型:function GetResponse(const AAllowedResponses: Array of SmallInt): SmallInt; virtual;
对于简单的命令应答可以使用这个方法获取应答消息,返回值:SmallInt - The numeric response number.
4、ReadBuffer
原型:procedure ReadBuffer(var ABuffer; const AByteCount: Longint);
读取指定数目的字节到缓冲区ABuffer,注意它会调用 ReadFromStack 以检查缓冲区里的数据是否少于AByteCount
5、ReadInteger
原型:function ReadInteger(const AConvert: boolean): Integer;
从缓冲区中读取整型数据,它会调用ReadBuffer
6、ReadLn
原型:function ReadLn(const ATerminator: string; const ATimeout: integer): string; virtual;
读取移行记录,带有一个TimeOut属性,以防止在读不到新行时死循环。返回值:String - Line read from the buffer.
注意行分隔符可能是以下几种:
#0 - Default Line Feed (#10)
LF - Line Feed (#10)
CR - Carriage Return (#13)
EOL - End-of-line (Carriage Return Line Feed)
7、ReadLnWait:
原型:function ReadLnWait: string;
很像ReadLn,但它会一直傻傻的等待
8、ReadSmallInt
原型:function ReadSmallInt(const AConvert: boolean): SmallInt;
9、ReadStream
原型:procedure ReadStream(AStream: TStream; AByteCount: LongInt; const AReadUntilDisconnect: boolean);
10、ReadString
原型:function ReadString(const ABytes: integer): string;
与CurrentReadBuffer的不同在于它读取指定长度的字符串
IdTCPClient和IdTCPServer主要属性
2008-10-13 12:40
IdTCPClient属性
1 : IOHandler 如果有相应的输入/输出操作,那么IOHandler相对应的组件或
接口将提供一个虚拟/抽象的输入/输出接口给相应的网络连接
2 : Intercept 如果有一个网络连接正在使用,那么Intercept 提供的组件或接
口将可以拦截相应的网络数据流中的数据
3 : BoundIP 指定使用IdTCPClient组件的计算机系统的IP地址,也就是说,其
中是空白那么什么样的计算机都可以使用,但如果指定的IP地址为239.126.12.2,那么
就只有IP地址为239.126.12.2的计算机可以使用它.
4 : BoundPor 网络端口的概念,指定使用IdTCPClient组件的计算机系统网络
端口,也就是说,如果BoundPort中指定了以整数为端口的网络端口,那么通讯时就只能
使用这个商品进行通讯
5 : Host 如果不是使用BoundIP中的地址起先通讯,那么Host就是诣将
要通讯的计算机系统的名称或它的IP地址,可以是计算机名也可以是IP地址.
6 : Port 与BoundPort的概念是基本一样的,只是它与HOst相配合来决
定IdTCPClient组件要与哪一个计算机系统中的什么样的网络通讯端口进行通讯
方法
IdTCPClient 主要使
用Write,WriteBuffer,WriteCardinal,WriteFile,WriteHeader,WriteInteger,WriteL
n,WriteRFCReply,WriteRFCStrings,WriteSmallInt,WriteStream,WriteStrings.
通过它们 IdTCPClient 可以发送非常多的类型的数据到相应的服务端,而这些都是非
常的简单
如: Write的函数说明是:
procedure Write(Const Aout : String) ; Virtual;
它的目的很简单,就是发送一个字符串到相应的服务端.其中Aout就是被发送的字符串.
而 WriteLn的函数说明是:
procedure WriteLn(Const Aout : String = ''); Virtual;
它的目的就是在Write的基础上,在被发送的字符串后加入相应的回车控件符.
注意 : 虽然IdTCPClient可以直接使用,它不可以被单独的使用,它必须与相应
的IdTCPServer组件相配合才能发挥特定的作用,当然,如果相应的网络系统中具有这
样的TCP服务器应用,那么IdTCPClient也可以直接与它们进行通讯.
IdTCPServer
属性
1 : Bindings 包括了相应的服务端所允许的所有的Socket(套接字)的相关信
息,比如它们的IP地址和端口号
2 : ListenQueue 是规定在服务端失效之前最多可以允许的监听网络连接的纯种
数目.默认情况下它的值是15,但这个值可以根据自己的需要和系统的最大承受能力来
进行改变
3 : MaxConnects 它表示的内容就是服务端可以承载的最大的网络连接数目,如果
它的值是0,那么就表明它没有最大的限制值,可以使用任意数目的连接.
4 : MaxConnectionReply 与MaxConnects相配合,当连接数目大
于MaxConnects的数目时,它将返回一个错误的信息,而这个信息是由TIdRFCReply
类所定义的
5 : ThreadMgr 就是使用相应的 ThreadMgr 组件来对于网络连接线程进行管
理.
TidTcpClient总结相关推荐
- Dokan虚拟磁盘开发实战
因工作需要,最近与同事合作使用Dokan开发了一个虚拟磁盘的简单程序,初步实现了远程目录映射到本地虚拟磁盘的功能. 远程服务端是用Python写的,主要是将远程主机上的目录文件传给客戶端,在这里就不细 ...
- Delphi-IOCP学习笔记九======性能测试和IOCP源码下载5000个连接数
刚刚的测试,服务端上图 开了5个客户端<每个客户端1000>进行测试. 内存视乎不是很多.客户端的发过来的数据包大小在4096+88字节左右. 测试Echo测试线程 procedure T ...
- TCP聊天工具的实现
由于本人天生愚钝,所以关于聊天工具的编程一直都没学会,尽管网上教程一大堆,但是关于IdTCPClient IdTCPServer 的不多,今天终于学会一些,分享给像我一样纠结的小伙伴,下一步学习多线 ...
- 游戏机器人的开发工具及开发步骤
由于手头的一个网游项目正在启动,所以,这一篇文章与上一次的文章之间相隔了很长的时间,特向读者道歉,让大家久等了. 这个系列文章,是没有事先打草稿的,纯属信手写来,所以,其中的条理性可能不太好,我会在以 ...
- \t\t使用INDY的IdMappedPortTCP控件实现动态的HTTP代理服务器
在工作中,需要一个时间控制条件非常复杂的代理服务器,因此只能自编.从网络中找到一些用ServerSocket和ClientSocket开发的代理服务器源代码,比较复杂.因此想用INDY控件组中的IdM ...
- Delphi断线重连线程
作为tcp客户端,使用TIdTcpClient控件,在与后台服务的交互时,如果出现网络异常,或者后台服务重启,会导致无法保存数据或查询后台数据,这种情况下可以开启断线重连线程,自动连接上后台服务 un ...
最新文章
- MyBatisPlus中删除方法deletetById、deleteBatchIds、deleteByMap的使用
- C++ 应用程序性能优化,第 6 章:内存池
- 【博客搬家旧文】剑指offer [ java ] 面试题10 斐波那契数列
- zoj 3632 Watermelon Full of Water
- ubuntu中解压rar文件遇到乱码的解决方法
- 看 B 站,可以更快!
- crowd counting_[crowd_counting]-SFANet-arxiv1902
- 机器人学 —— 机器人感知(Kalman Filter)
- vs2008 jQuery 智能提示失败可能是Jquery版本问题
- 统计·数值分析·概率论·人工智能数学基础
- 3V升压5V芯片,3V升压5V电路图
- GPS卫星定位—python实现
- 画fits图像上的极小值点
- qq空间java版_Java版 QQ空间自动登录无需拷贝cookie一天抓取30WQQ说说数据流程分析【转】...
- sphinx-for-chinese在windows下安装与使用方法
- 区块链创业公司解散后,我去美团送外卖了 | 链人生
- 不能作为c语言常量的是115L,c语言考试选择题
- 【Jmeter 简单使用】
- 阿里巴巴反购雅虎胜算几何?
- 计算机中的微信无法启动,无法打开微信计算机版本文件如果无法打开微信计算机版本怎么办...