Delphi关于TServerSocket/TClientSocket实现通信，

[linzhen6790]

如图所示

第一，客户端连接，通过账号，密码，IP，端口，验证，;服务端那边连接状态列表，自动显示

第二，客户端发送信息（信息为两部分组成，第一部分是edit1.text为类型为1,2,3，1为添加数据，2为修改数据，3为查询数据;第二部分memo1.text为数据）,服务端接收信息并显示信息内容（edit1.text+memo1.text），然后根据edit1.text显示的类型，处理memo1.text数据，比如，为1，服务端就分析memo1.text的数据，添加到数据库，成功或者失败返回给客户端一个信息

源码地址http://download.csdn.net/detail/linzhen6790/5434619

这个服务端的ServerSocketClientRead要怎么写呢

[linzhen6790]

修改好的代码也可以发送到我的邮箱:[e-mail]

[hackervip1988]

坑爹 呀 ，情何以堪

[linzhen6790]

hackervip1988 何解？

[UnkownState]

ServerSocketClientRead中分析客户端发来的数据，做相应处理。

[linzhen6790]

楼上了，不会吧。。。。。

[zhengjiujie]

我单独用TServerSocket控件来监听端口，每次连接都能连上，但是为什么不管用什么接收方式都只显示一个字母h呢，求救啊

[zhengjiujie]

知道原因了，我要接收的16进制数，但是他自动把16进制数转换为字符型了

[zhengjiujie]

是啊，我也搞不懂为什么。我没用客户端控件（客户端连接的GPRS每隔2分钟发送给我的一串数据帧），只用服务端控件监听端口，网络上所有关于TServerSocket控件的接收方式也都试过，但是接收到的都是只显示一个字母h？为啥呢

[zhengjiujie]

但是，怎么接收16进制呢？Socket.Connections[i].ReceiveBuf(buf,len);怎么用呢，求指教啊

[linzhen6790]

唉，这几天没时间 ，来看一下，已经可以显示名称了，但是客户端断开链接，服务器端没有删除客户端的信息

大神都没空，帮忙看一下，

[linzhen6790]

我再加点分吧，希望大神能看到，帮忙解决一下

[ZyxIp]

修改好的代码也可以发送到我的邮箱:[e-mail] ----------------------------------------------------- 好象没人欠你啥啊？？ -------------------------------- 首先，你应该明白，数字，字符串，图片所有这些都是表象，在计算机里只有内存，里面都是按字节保存的是一个个数字，至于这个数字是字符，还是什么，看你自己的定义。 如在某个字节中保存的是 98，这可以有就是数字98也可能以是b. 网络上收到的是一个个字节，至于表示什么意思你要搞明白它发送时的结构定义。 服务器端有客户端断开的事件，你可以在这面删除。

[wuxinyuanasdfghjkl]

楼主，能不能给个联系方式

[孤独de猫]

http://download.csdn.net/detail/unearth/6485055 去看这个示例吧。