TDispDesc = packed record
  DispID: Integer;
  ResType: Byte;
  CallDesc: TCallDesc;
end;

struct TDispDesc {
  int DispID;
  Byte ResType;
  TCallDesc CallDesc;
};