如何把 byte 型数组用mscomm.output属性输入串口缓冲区。output是olevariant型的。(100分)

请问各位高手，在delphi6中使用mscomm控件，如何把 byte 型数组用mscomm.output属性输入串口缓冲区。output是olevariant型的。
var
Form1: TForm1;
viewstring:string;
i:integer;
rbuf:array[0..9] of byte;
sbuf:array[0..7] of byte;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
begin
form1.MSComm1.OutBufferCount:=0;
sbuf[0]:=byte($81);//地址
sbuf[1]:=byte($81);
sbuf[2]:=byte($54);//读
sbuf[3]:=byte($01);//参数代号
sbuf[4]:=byte($00);//数据
sbuf[5]:=byte($00);
sbuf[6]:=byte($53);//crc校验
sbuf[7]:=byte($01);
?????????????????????????
?????????????????????????
????????????????????????

form1.MSComm1.Output:=?????????????????
end;
procedure TForm1.FormShow(Sender: TObject);
begin
form1.MSComm1.PortOpen:=true;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
form1.MSComm1.PortOpen:=false;
end;
end.

用于仪表通讯
请指点，急急！

move

可以说的详细点吗？