串口通讯SPCOMM控件如何发送#0这个字符。

Question

SPCOMM控件的WriteCommData过程，发送的内容是PChar类型，但是#0刚好是Pchar的结束符。
所以我要发送例如：#68#31#0#55这样的字符串便无法发送完，只能发送到#68#31。
请问各位高手，如何可以把整个字串发送完成？

Answer 1

function sendcommand():boolean;
var
sbuf:array[0..3] of byte;
begin
sbuf[0]:=byte(68);
sbuf[1]:=byte(31);
sbuf[2]:=byte(0);
sbuf[4]:=byte(55);
comm1.writecommdata(@sbuf,4);
end;

Answer 2

function sendcommand():boolean;
var
sbuf:array[0..3] of byte; 
begin
sbuf[0]:=byte(68);
sbuf[1]:=byte(31);
sbuf[2]:=byte(0);
sbuf[3]:=byte(55);
comm1.writecommdata(@sbuf,4);
result:=true;
end;