Source position: comctrls.pp line 637
type TListItemStates = set of (
lisCut,
lisDropTarget,
lisFocused,
lisSelected
);