通过ICS（Internet组件套件）Delphi发送记录

Question

我想将ICS (Internet Component Suite)的记录从客户端发送到服务器 我有一个记录

PIPCDataPhone = ^TIPCDataPhone;                        
TIPCDataPhone = record                                     
  cmd: string[15];                                       
  Mode: Integer;                                          
end;

我想使用协议TCP

将该记录发送到服务器

感谢

Answer 1

这主要关注Indy组件，但请看这里的原理。

基本上，您需要将记录写入套接字缓冲区，告诉它有多大。 然后在接收端，您收到发送的字节数并将其转换为记录类型。

http://delphi.about.com/od/internetintranet/l/aa020403a.htm

Answer 2

试

TClientSocket.socket.sendstream

但在这种情况下，您必须管理发送的数据和内存。