udp 如何广播结构体(delphi 7 '255.255.255.255'),请知道的帮忙看下,谢谢了

2004v2004 2014-10-09 12:39:54
IdUDPServer1.Broadcast 这个只能发字符串出去 我怎么样才能把我的结构体数据发出去.,

用别的控件也可以,请大家详细指导下,谢谢了




我的结构体是

type
SendStruct =packed record
Cmd: byte; // 命令码 */
TSASID: array[0..11] of byte; // TSAS唯一ID */ Word
CfgPCMAC: array[0..5] of byte; // 配置PC的MAC地址
IPAddr: array[0..3] of byte; // TSAS的IP地址
GWIP: array[0..3] of byte; ///* 网关IP地址 */
Mask: array[0..3] of byte; ///* 子网掩码 */
MAC: array[0..5] of byte; // /* TSAS的MAC地址 */
SerPort: Word; // /* 服务器的端口 */
SerIPAddr: array[0..3] of byte; // /* 服务器的IP地址 */
SerDomainName: array[0..99] of byte; // /* 服务器的域名 */

BakSerPort: Word; // /* 备用服务器的端口 */
BakSerIPAddr: array[0..3] of byte; // /* 备用服务器的IP地址 */
BakSerDomainName: array[0..99] of byte; // /* 备用服务器的域名 */

DNSIPAddr: array[0..3] of byte; // /* DNS服务器的IP地址 */
DNSEnable: byte; // /* DNS使能 */
end;
...全文
348 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
2004v2004 2014-10-31
  • 打赏
  • 举报
回复
IdUDPServer1.BroadcastEnabled:=true; 将此设置成 true 即可. IdUDPServer1.SendBuffer('255.255.255.255',9999,Buffer,Sizeof(SendStruct)); 测试通过 感谢那些帮忙的人
2004v2004 2014-10-09
  • 打赏
  • 举报
回复
IdUDPServer1.BroadcastEnabled:=true; 将此设置成 true 即可. IdUDPServer1.SendBuffer('255.255.255.255',9999,Buffer,Sizeof(SendStruct)); 一会找哪个设备 测试,通过就结贴
2004v2004 2014-10-09
  • 打赏
  • 举报
回复
望详细说下 IdUDPServer1.SendBuffer('255.255.255.255',9999,Buffer,Sizeof(SendStruct)); 这样可是不行
bdmh 2014-10-09
  • 打赏
  • 举报
回复
要用SendBuffer之类的

1,594

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧