TCMMouseActivate = packed record
  Msg: Cardinal;
  Reserved: Integer;
  MouseActivateRec: PMouseActivateRec;
  Result: Integer;
end;

struct TCMMouseActivate {
  unsigned Msg;
  int Reserved;
  PMouseActivateRec MouseActivateRec;
  int Result;
};