FLEXGRID - SCROLL

USUARIO.EXCLUIDOS 06/12/2006 10:39:35
#188288
Olá GURUS de plantão,

Bom dia.

Tenho uma lista de nomes num FlexGrid. Criei um abecedário que me permite pular para o primeiro nome iniciado com uma determinada letra:

Private Sub btABC_Resp_Click(Index As Integer)
    
    MyFlex.Col = 0
    MyFlex.Row = 1
    
    Do While UCase(Left(MyFlex.Text, 1)) < btABC_Resp(Index).Caption And MyFlex.Row < (MyFlex.Rows - 2)
       MyFlex.Row = MyFlex.Row + 1
    Loop
    
End Sub


Tudo funciona bem quando a letra escolhida está entre as linhas visiveis do flex. Por exemplo, eu tenho listado:

Maria Rita
Neusa
Paula
Regina
Roberta
Sandra


Se eu escolho as letras entre "M" e "S" tudo funciona perfeito mas se eu escolho ">=T" ou "<=L" - o sistema se posiciona na linha correta mas as linhas mostradas são as mesmas. Eu queria, por exemplo, caso escolhesse "T", que a flex fizesse o scroll e mostrasse:

Neusa
Paula
Regina
Roberta
Sandra
Tà¢nia


Como fazer isso???

(será que esta é mais uma das que "calam" o Matioli?) [s41]
USUARIO.EXCLUIDOS 06/12/2006 11:23:27
#188296 Resposta escolhida

para forçar o scrool tenta isto:


MSFlexGrid1.TopRow = MSFlexGrid1.Row
USUARIO.EXCLUIDOS 06/12/2006 11:42:49
#188301
Citação:

PASTOR escreveu:

para forçar o scrool tenta isto:


MSFlexGrid1.TopRow = MSFlexGrid1.Row





Numa palavra: PERFEITO!

Obrigado.

CASO ENCERRADO [s95]
Tópico encerrado , respostas não são mais permitidas
Voltar