TShiftState是在Delphi中定义的集合类型，表示组合键常用于鼠标和键盘事件。TMousebutton是枚举类型表示鼠标按键和滑轮。

定义：

TShiftState = set of (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble, ssTouch, ssPen);

TMouseButton = (mbLeft, mbRight, mbMiddle);

二者都包含了鼠标的left right middle按键，所以有时候在判断鼠标键被按下时可以通用，比如鼠标的onmousedown,onmousemove事件。但我要说的是在onmouseup事件里却不行。在up事件里只能用TMousebutton来判断鼠标弹起的是哪个按键，TShiftState没有用