命令字是$FE,如何发送?如果写成
MSComm.Output := Byte($FE);会发生错误;
但是MSComm.Output := Char($FE);的话也容纳不下,
迷惑中……到底如何发送?

解决方案 »

  1.   

    你可以先将FEH转换为十进制的数DMSComm.Output := Byte(D);
      

  2.   

    用variant
    VarArrayCreate
    來放你的$FE
      

  3.   

    我这就一个Byte,数组怎么定界?
    varArrayCreate([0, ?], varVariant)
      

  4.   

    再靠……
    这样写
    function TForm1.ConvertData(Data: Byte): OleVariant;
    var
      rst: OleVariant;
    begin
      rst := varArrayCreate([0,0], varByte);
      rst[0] := Byte(Data);
    end;居然还是抛出“非法属性值”异常,怎么搞得?
      

  5.   

    MSComm.Output := Chr($FE);试试 ,或者MSComm.Output := #$FE;
      

  6.   

    这样写:
    var tv:variant;
        otv:olevariant;
    begin
      tv := $EF;
      otv := tv;  
      mscomm1.output := otv;
    end;