DBGrid能不能用Shift多选（主要是没有鼠标按下事件）？

Question

主要是没有鼠标按下事件指的是在有内容的地区不会触发鼠标事件
谁能告诉该怎么做？我现在能模拟选中，但不知怎样才能使Shift按钮再点击鼠标的消息事件？

Answer 1

先将DBGrid.option设为行多选，
然后
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
判断Shift: TShiftState即可

Answer 2

同意 lastleo 的.用shift和ctrl同理.

Answer 3

我不知道你们有没有试过，在窗体的鼠标按下事件中写只有当鼠标点击窗体上才会触发该事件，当你点击DBGrid1内就不会触发该事件。