TXButtonEvent

type TXButtonEvent = record

  _type: cint;

  serial: culong;

  send_event: TBool;

  display: PDisplay;

  window: TWindow;

  root: TWindow;

  subwindow: TWindow;

  time: TTime;

  x: cint;

  y: cint;

  x_root: cint;

  y_root: cint;

  state: cuint;

  button: cuint;

  same_screen: TBool;

end;