各位大虾,现在要求多选,但是,不能用鼠标拖动,请问,应该怎么办?

解决方案 »

  1.   

    procedure TForm1.ListView1MouseDown(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
    begin
      ListView1.MultiSelect := not ((ssShift in Shift) or (ssCtrl in Shift))
    end;—————————————————————————————————
    宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
    —————————————————————————————————
      

  2.   

    将multiselect设置为true, 就可以鼠标拖选
      

  3.   


      to 二楼的 lxpbuaa(桂枝香在故国晚秋) ,你测试过吗?  好像不能用。
      

  4.   

    koa3000 (koa)  
    到底是要求能用鼠标拖动实现多选还是不能?上面的是表示不能用鼠标配合Ctrl和Shift键实现多选,而只能用Ctrl、Shift和上下箭头键实现。如果你的意思是要求用鼠标拖动实现多选,那么将MultiSelect设为true就行了。—————————————————————————————————
    宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
    —————————————————————————————————
      

  5.   

    那么将MultiSelect设为false就行了。
      

  6.   


     ft,将 MultiSelect 设置为 false 就不可以多选了。  要求可以多选, 但是不能鼠标拖动多选。