TMouseActivateRec = record
  MousePos: TPoint;
  HitTest: Integer;
  Button: TMouseButton;
  ShiftState: TShiftState;
  TopLevel: HWND;
end;

struct TMouseActivateRec {
  TPoint MousePos;
  int HitTest;
  TMouseButton Button;
  TShiftState ShiftState;
  HWND TopLevel;
};