百分求助：delphi怎么用mscomm发送十六进制数据？

[quickboy19821982]

就举个例子，目前需要发送这么一串数据：
0xAA 0x55 0x10 0x00
该怎么实现？
最好能给出源码，谢谢大虾们了

[柯本]

首先将MSCOMM的 inputmode设置为comInputModeBinary,
试试以下程序:

  var   
  buf:variant;   
  bf:olevariant;   
  begin   
          buf:=vararraycreate([0,3],varbyte);   
          buf[0]:=$aa   
          buf[1]:=$55;   
          buf[2]:=$10;   
          buf[3]:=$00;   
          bf:=buf;   
          mscomm1.Output:=bf;   
  end;   

[贝隆]

看看这本书，串口通信的：http://download.csdn.net/source/1523158