COMO PROIBIR A MULTISELECAO NO MSHFLEXGRID?

MARCOS 29/01/2013 12:24:21
#418299
Bom dia!
Pessoal,
Para o VB (6.0) o MSHFlexgrid é um ótimo Grid.
Mas,recentemente precisei modificar um projeto feito em VB.
Eu simplesmente não encontrei como desativar a Multiseleção.
Se algum colega souber como fazer para que seja mantida somente a
seleção de uma linha de cada vez fico grato.

Obs: Tentei a propiedade [Ô]AllowBigSelection[Ô] para False, mas não impede a multiseleção de linhas.
GANDA.NICK 29/01/2013 15:51:18
#418321 Resposta escolhida
olá,

Acho que vc vai ter que usar os eventos do flexgrid

veja isto:

Private Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
    MSFlexGrid1.Col = 0
    MSFlexGrid1.ColSel = MSFlexGrid1.Cols - 1
    MSFlexGrid1.Redraw = False
End Sub

Private Sub MSFlexGrid1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
    MSFlexGrid1.Col = 0
    MSFlexGrid1.ColSel = MSFlexGrid1.Cols - 1
    If MSFlexGrid1.Row - MSFlexGrid1.RowSel <> 0 Then [ô]Mais que uma linha seleccionada
        MSFlexGrid1.Row = MSFlexGrid1.RowSel
        MSFlexGrid1.SetFocus
    End If
    MSFlexGrid1.Redraw = True
End Sub



Vc vair ter que fazer algo parecido também para não selecionar pelo teclado...


espero ter ajudado

té +
MARCOS 29/01/2013 17:25:04
#418332
Muito obrigado,Ganda!
Tópico encerrado , respostas não são mais permitidas
Voltar