USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Ordenar MSFlexGrid
Janaina
não registrado
Postada em 10/09/2008 22:00 hs   
Ai Galera, de novo...
Fiz uma rotina onde ao clicar na linha de cabeçalho (FixedRow)  a coluna do grid é ordenada, funcionou legal, so está aparecendo um problema,
Para ele funcionar tive que colocar no evento click a linha:
if grade_cadastro.rowsel = 1 ... bla bla bla

porque quando coloco grade_cadastro.rowsel = 0 ( que teoricamente seria a primeira (fixedros) ele não funciona, com isso quando clico na 1 linha de dados a row 1 ele tb está ordenando (ou seja ele ordena quando clico na fixedrow e na primeira linha de dados) estou achando muito estranho (ah! quando faço um debug ao clicar na fixedrow ele retorna como rowsel o valor 1, porque?
Olhem a rotina abaixo:
If grade_cadastro.RowSel = 1 Then
   grade_cadastro.Col = 0
   If grade_cadastro.Col = 0 Then
      grade_cadastro.Sort = 2
    ElseIf grade_cadastro.Col = 1 Then
      grade_cadastro.Sort = 1
    Else
    End If
    Exit Sub
End If
     
Ash Katchup
CAXIAS DO SUL
RS - BRASIL
Postada em 11/09/2008 16:41 hs            
Olá.
Por acaso você tem algo escrito nesta linha 0?
Eu peguei o seu código e coloquei aqui no meu VB e reparei que, ao clicar na linha fixed, a RowSel fica sendo "MsFlexGrid.Rows-1"

O negócio é vc fazer assim:

    If MSFlexGrid1.RowSel = MSFlexGrid1.Rows - 1 Then
        MSFlexGrid1.RowSel = 0
    End If

     
Gleisson
não registrado
ENUNCIADA !
Postada em 20/09/2009 18:14 hs   
Janaina, tudo bem?

ao invés de usar "grade_cadastro.RowSel=1" na sua condição, use o seguinte:

grade_cadastro.MouseRow=0
   
Davilson Negris
não registrado
ENUNCIADA !
Postada em 28/01/2010 19:25 hs   
Private Sub MSFlexGrid1_Click()
        MSFlexGrid1.Sort = flexSortGenericAscending
End Sub
   
asf
não registrado
ENUNCIADA !
Postada em 10/08/2010 13:40 hs   
:p
   
asf
não registrado
ENUNCIADA !
Postada em 10/08/2010 13:41 hs   
   
Página(s): 1/2      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página