在DBgrid里如何用shift＋鼠标键实现连续选择功能

Question

我知道shift＋up(down)可以连续多选
另外ctrl＋鼠标可以一条一条的选，
我要得是用shift键＋鼠标实现连续选择！
谢谢！

Answer 1

用dbgrideh吧
可以直接连续选择。

Answer 2

我不想用dbgrideh，请问用程序如何实现？

Answer 3

比如你把东西导入到ListBox1，我要得是用shift键＋鼠标实现连续选择！var i:Integer;
begin
     // 你必须先到Object Inspector把DBGrid属性Options
     // 中的 dgRowSelect 和 dgMultiSelect 设成true
     for i:=0 to DBGrid1.SelectedRows.Count-1 do begin
DBGrid1.DataSource.DataSet.Book:=DBGrid1.SelectedRows.Items[i];
ListBox1.Items.Add(Table1CustNo.AsString);
     end;