向串口发“箭头”

Question

一个程序模拟“超级终端”，用SPComm 控件，调试交换机，
例
发“tab”只要WriteCommData(pchar(#9),1)
发“esc”只要WriteCommData(pchar(#27),1)
如何向串口发“箭头”，即 上下左右它们有对应的ascii码吗？
还是有转义符不是37,38,39,40

Answer 1

肯定不是37，38，39，4037:%
38:&
39:'
40:(发送这样的字符，我记得还要置位操作，具体操作我看能否查得到。

Answer 2

必须置高位为1，代码如下：Function MakeWord(L,H: Byte): Word;
begin
  MakeWord := (H shl 8) + L;
end;MakeWord(37,$80);
MakeWord(38,$80);
MakeWord(39,$80);
MakeWord(40,$80);

Answer 3

应该用的是标准代码
因为在“超级终端”和CRT 4.0.7 中都能用箭头控制

Answer 4

WriteCommData(pchar(#126),1),应该可以吧。

Answer 5

有位老兄已告诉我了，要发3个字节
#27[A  上
#27[B  下
#27[C  右
#27[D  左