可以在TIdTCPClient中发送RST标志吗?

时间:2015-06-03 09:53:01

标签: sockets delphi vcl indy10 delphi-xe8

我需要在一个套接字中发送RST标志,是否可能?

当我关闭TIdTCPClient时,TCP服务器程序告诉我连接仍然存在,2分钟后连接消失。

我这样做:

TCPCliente := TIdTCPClient.Create(nil);
TCPCliente.Host := edtIP.Text;
TCPCliente.Port := 492;
TCPCliente.ConnectTimeout := 1000;
TCPCliente.Connect;
TCPCliente.Socket.WriteLnRFC(TextoEnvio, IndyTextEncoding_8Bit);
Texto := TCPCliente.Socket.ReadLn(IndyTextEncoding_8Bit);
TCPCliente.Socket.Close;
TCPCliente.Disconnect;
TCPCliente.Free;

我正在使用RAD Studio XE8。

0 个答案:

没有答案