简单问题,送分,有关MSComm控件(100分)

  • 主题发起人 主题发起人 俊友
  • 开始时间 开始时间

俊友

Unregistered / Unconfirmed
GUEST, unregistred user!
在Delphi中的MSComm控件中
怎么样以十六进制发送数据?
比如现有一个字节数组,MSComm1.output怎么写?谢谢!
 
#$3+#$7+#$0+#$0+#$24
 
楼上的兄弟,你这样好像是字符形式发送。我这样写对不对呢?

MScomm1.output:=sbuf; //sbuf是字节数组

上面这样写是不是以十六进制发送的??
 
建议用spcomm
 
spcomm是可以的
 
這是我的一個發送數據到com1口的函數:
procedure TMainf.BtimeClick(Sender: TObject);
var a:byte;i:integer;str:array[0..6]of string;
tmp:String;
begin
a:=$09; //這個就表示是十六制數
com.WriteCommData(@a,1);//發送該十六制數的地址
str[0]:=right('0000'+edit5.text,2);
str[1]:=right('00'+edit6.text,2);
str[2]:=right('00'+edit7.text,2);
str[3]:=right('00'+edit8.text,2);
str[4]:=right('00'+edit9.text,2);
str[5]:='00';
str[6]:=right('00'+edit10.text,2);
for i:=0 to 6 do
begin
a:=strtoint(str);
com.WriteCommData(@a,1);
end;
end;
 
多人接受答案了。
 
后退
顶部