Source position: system.uitypes.pp line 538
type TScrollCodes = set of (
scLineUp,
scLineDown,
scPageUp,
scPageDown,
scPosition,
scTrack,
scTop,
scBottom,
scEndScroll
);