packed record

[zhangxuyu1118]

用这个函数：Send(const Cmd: PChar; const Len: integer): Boolean;
发送数据CurCmd：
//命令定义
type
TCmd = packed record
FHead: Array[0..1] of Byte;
FADDR: Byte;
FDATA: Array[0..3] of Byte;
FTail: Byte;
end;
var
CurCmd: TCmd;

该怎么发送。
要求：
最好直接发送，不要再将CurCmd中的数据一个个地移到Buffer: Array[0..7] 中然后
Send（Buffer， 8）

[gzmhero]

p:pchar;
p:=pChar(@CurCmd);
Send(p^,sizeof(TCmd));

[huangjacky]

Send（@curcmd， 8）
收工

[starluck]

p:pchar;
p:=pChar(@CurCmd);
Send(p^,sizeof(TCmd));


太快了。

[huangjacky]

楼上2位 正解，我错了
指针 和 首地址，没有分清楚呀。

[kampan]

1楼正解

[qxf32]

Send(pChar(@CurCmd)^,sizeof(TCmd));

[tjg5202]

可以结贴了。。。。。。