给串口发送数据比如
s := #$08+#$f7+#$01+#$03+#$03+#$07;如果我要发送变量,即上面的命令中某个16进制字符是通过变量转变的出来的var
i:integer;
i应该怎么写,才能有#$08这样的效果。 急
s := #$08+#$f7+#$01+#$03+#$03+#$07;如果我要发送变量,即上面的命令中某个16进制字符是通过变量转变的出来的var
i:integer;
i应该怎么写,才能有#$08这样的效果。 急
procedure TForm1.BitBtn57Click(Sender: TObject);
var
s:string;
begin
s:='#$'+sysUtils.IntToHex(10,2);
Caption:=s;
end;
s:=chr(8)+chr(247)+chr(1)+chr(3)+chr(7)就可以了。
s1,s2: string;
begin
s1 := #$08+#$f7+#$01+#$03+#$03+#$07;
showmessage(s1);
s2:= chr(8)+chr(247)+chr(1)+chr(3)+chr(3)+chr(7);
showmessage(s2);
end;都是显示同样的东西