TOvcCmdRec

type TOvcCmdRec = packed record

  case Byte of

    0: (

        Key1: Byte;

        SS1: Byte;

        Key2: Byte;

        SS2: Byte;

        Cmd: Word;

      );

    1: (

        Keys: LongInt;

      );

end;