Página 1 de 1

Como ordenar os itens em uma Grid

Enviado: 30 Out 2013 16:06
por Paulo_CPV
Boa tarde!

Estou com a seguinte dúvida: tenho um .Dbf com aproximadamente 1.000 registros e não estou conseguindo ordenar os registros por nome, tenho 9 campos e gostaria que a Grid em questão ficasse ordenada por nome ou por outro campo que eu quiser.

Como posso fazer isto?

[]'s
Paulo - Jacareí/SP

Como ordenar os itens em uma Grid

Enviado: 31 Out 2013 08:50
por Pablo César
Oi Paulo,

Indexa de acordo a cada coluna que você deseja ordenar e utilize o SET ORDER como no Clipper.

Como ordenar os itens em uma Grid

Enviado: 31 Out 2013 11:34
por Paulo_CPV
Bom dia, Pablo!

Fiz o que você me disse, deu certo. Mas agora quando eu dou um duplo click ou enter na linha do grid ele não mostra o conteúdo da linha mas sim os dados da primeira linha. A função é a seguinte:

Código: Selecionar todos

FUNCTION SelNome()

   LOCAL nPos := Consulta.grid_1.Value
   
   aRet := Consulta.Grid_1.Item(nPos)

   SISCPVIMP->(DBSetOrder(3)) // Está ordenado por Nome
   SISCPVIMP->(DBGotop())
   SISCPVIMP->(DBSeek(aRet[2]))

   IF FOUND()

      MSG_INFO("Matricula: "+SISCPVIMP->mat_imp+QUEBRA+;
            "Nome: "+SISCPVIMP->nome_imp+QUEBRA+;
            "NIT: "+oSistema:MascaraNit(SISCPVIMP->nit_imp)+QUEBRA+;
            "DIB: "+DTOC(SISCPVIMP->dib_imp)+QUEBRA)
   
   ENDIF

RETURN NIL

Como ordenar os itens em uma Grid

Enviado: 31 Out 2013 15:30
por Pablo César
Veja este exemplo em anexo. Talvez precise você dar um refresh no grid.