TShiftState

type TShiftState = set of (

  ssShift,

  ssLeftShift,

  ssRightShift,

  ssCtrl,

  ssLeftCtrl,

  ssRightCtrl,

  ssAlt,

  ssLeftAlt,

  ssRightAlt,

  ssAltGr,

  ssCapsLockPressed,

  ssCapsLockOn,

  ssNumLockPressed,

  ssNumLockOn,

  ssScrollLockPressed,

  ssScrollLockOn

);