1,184
社区成员
发帖
与我相关
我的任务
分享
TSocketHead = packed record
TotalLength: Cardinal;
CommandId: Cardinal;
SequenceId: Cardinal;
end;
{Socket包信息}
TSocketBody = packed record
Head: TSocketHead;
bytes: array of Byte;
end;
body.Head.TotalLength:=12;
body.Head.CommandId:=1;
body.Head.SequenceId:=1;
send(sck, body.Head, SizeOf(body.Head), 0);
,讨厌变词频的输入法。!!