社区
网络通信/分布式开发
帖子详情
如何用TClientSocket和TServerSocket实现自定义数据结构的收发?
star_of_light
2003-11-19 10:36:35
比如,如何收发记录数据;记录格式如下:
USR=Record
id:String;
name:String;
PWD:String;
end;
...全文
53
9
打赏
收藏
如何用TClientSocket和TServerSocket实现自定义数据结构的收发?
比如,如何收发记录数据;记录格式如下: USR=Record id:String; name:String; PWD:String; end;
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
insert2003
2004-02-13
打赏
举报
回复
TMyRecord1=record
MyName1 : string[10];
end;
TMyRecord2=record
MyName2 : array[0..20]of Char;
end;
TMyRecord=record
head :TMyrecord1;
name :TMyrecord2;
end;
var
buf : TMyRecord
begin
Socket.SendBuf(buf,sizeof(TMyRecord));
end;
topgun2
2004-02-11
打赏
举报
回复
看来你没有做过,底层.
这样的情况,关键是还要定义一个包头结构,定义消息的长度....
先收包头,然后....
insert2003
2004-02-11
打赏
举报
回复
D7里怎么没有SendBuffer???
chaiqingfeng
2004-02-02
打赏
举报
回复
结构体中的类型改成char型的,用sendbuffer发送,接收方定义相同的结构体或使用一个大的数组接收
quansui
2003-11-24
打赏
举报
回复
或
TMyRecord=record
id : integer;
Name : string[20];
end;
happyboy
2003-11-24
打赏
举报
回复
记录中不能用string类型,string只是一个指针
TMyRecord=record
MyName : array[0..20]of Char;
end;
var
buf : TMyRecord
begin
Socket.SendBuffer(buf,sizeof(TMyRecord));
end;
这样就行了.
flfljh
2003-11-24
打赏
举报
回复
当然行啊
vargent77
2003-11-22
打赏
举报
回复
一般可以的,没问题,
挺好用:好像sendbuffer(结构指针,长度,长度)
不过这个长度要注意,如果你用的是char,往往用length 得出的结果不准!呵呵,可能是我菜才有这样的问题
dongmenbianxue
2003-11-22
打赏
举报
回复
这种做法不太好吧,如果发生粘包现像,就不好处理了~
delphi源码
TServerSocket
和
TClientSocket
文件传输
delphi源码
TServerSocket
和
TClientSocket
文件传输
Delphi
TServerSocket
,
TClientSocket
实现
传送文件代码
Delphi
TServerSocket
,
TClientSocket
实现
传送文件代码 1.建立两个工程Server及Client, 分别放
TServerSocket
及
TClientSocket
控件,Demo,Edit控件等。 2.设置
TServerSocket
name为 SS, ServerType为stNonBlocking,
TClientSocket
name为cs,Cl...
tcp ip通信
关键字: 如何编写用TCP/IP的通讯程序 关键字:TCP/IP,通讯程序,Socket,
TServerSocket
,
TClientSocket
作者:佚名 更新:2002-12-26 浏览:25313 最近在网上不断的看到有人问如何用BCB的
TServerSocket
和
TClientSocket
进行编程的问题,所以决定把我的一些编程经验告
Delphi
实现
传送文件 <
TServerSocket
/
TClientSocket
>
.建立两个工程Server及Client 分别放
TServerSocket
及
TClientSocket
控件,Demo,Edit控件等。 2.设置
TServerSocket
name为 SS, ServerType为stNonBlocking,
TClientSocket
name为cs,ClientType为ctNonBlocking表示异步读写信息。注意ClientType和ServerTy
Delphi之
TClientSocket
和
TServerSocket
使用tcp keepalive心跳机制
实现
“断网”、"断电"检测...
开发环境:Delphi7 测试环境:WinXP,Win7 32bit,Win7 64bit 使用
TClientSocket
和
TServerSocket
实现
TCP长连接通讯,经常因为断电断网等原因导致出现一些死连接。 解决方法是客户端和服务端都定时发送心跳包。 具体
实现
如下:
TClientSocket
和
TServerSocket
均使用非阻塞模式 1、
定义
心跳常量和Ke...
网络通信/分布式开发
1,592
社区成员
32,990
社区内容
发帖
与我相关
我的任务
网络通信/分布式开发
Delphi 网络通信/分布式开发
复制链接
扫一扫
分享
社区描述
Delphi 网络通信/分布式开发
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章