IdTCPServer和IdTCPClient传输数据的例子(100)

简单一点的例子 传输 packed record delphi自带的demo看不懂 哪位大侠能发哥例子给我学习学习 或许再简单一点，只要能实现一端发 一端收就OK（客户端和服务器是两个程序）请各位大侠帮帮忙啊

http://www.winu.cn/htmls/984/004/

TArrayString = array[0..99] of String[255]TClient = packed record Name string[50]; Time string[50]; Host string[50]; IP string[50]; MAC string[50]; Msg TArrayString; end; PTClient = ^TClient;......写 IdTCPClient.WriteBuffer(FClientSend, SizeOf(FClientSend), True);......读 AThread.Connection.ReadBuffer(Client, SizeOf(Client));

新手，先只要实现一个功能就是客户端发 服务器收。两个程序。最简单传输一个字符串就行。有什么示例么

多人接受答案了。