结构体定义
type
PAPIAlarm = ^TAPIAlarm;
TAPIAlarm = packed record
AlarmTime: TDateTime;
AutoHandled: Boolean;
ManualSend: Boolean;
Key: array[1..10] of Byte;
case AlmFlag: Char of
'1':(
ClientID: string[8];
ERFlag: Char;
AlarmCode: string[3];
AlarmText: string[20];
OrgAlarmCode: string[5];
case ZUFlag: Char of
'C': (ZoneID: string[3]);
'U': (UserID: string[3]);
);
'0':(
sMsg: string[60];
);
end;如题 谢谢
type
PAPIAlarm = ^TAPIAlarm;
TAPIAlarm = packed record
AlarmTime: TDateTime;
AutoHandled: Boolean;
ManualSend: Boolean;
Key: array[1..10] of Byte;
case AlmFlag: Char of
'1':(
ClientID: string[8];
ERFlag: Char;
AlarmCode: string[3];
AlarmText: string[20];
OrgAlarmCode: string[5];
case ZUFlag: Char of
'C': (ZoneID: string[3]);
'U': (UserID: string[3]);
);
'0':(
sMsg: string[60];
);
end;如题 谢谢
DateTime AlarmTime;
Boolean AutoHandled;
...
unsigned char Key[11];
union {
......
{
Date AlarmTime;
Bool AutoHandled;
byte key[11];
....... }
case AlmFlag: Char of
'1':(
ClientID: string[8];
ERFlag: Char;
AlarmCode: string[3];
AlarmText: string[20];
OrgAlarmCode: string[5];
case ZUFlag: Char of
'C': (ZoneID: string[3]);
'U': (UserID: string[3]);
);
'0':(
sMsg: string[60];
);
尤其是 case ZUFlag: Char of
'C': (ZoneID: string[3]);
'U': (UserID: string[3]);看不明白,你俩都没翻译,555555555555