TMOUSE

type TMOUSE = record

  topmode: Byte;

  buttons: Byte;

  x_scale: Byte;

  y_scale: Byte;

  x_max: SmallInt;

  y_max: SmallInt;

  x_start: SmallInt;

  y_start: SmallInt;

end;