Erro no Tbrowse()

[clodoaldomonteiro]

Olá amigos!

Uso o TBrowse para visualizar meus arquivos e nele tenho várias funções tipo: modificar, procurar, somar, filtrar e etc.

Só que quando eu faço um filtro e o resultado vem limpo, o sistema repete o último registro e deveria ser mostrado uma tela limpa, sem nenhum registro.

Quando usava o velho clipper não dava esse erro.

Tem alguma diferença entre o clipper e o xharbour, no que diz respeito ao Tbrowse?

[sygecom]

Depois do filtro de um:
DBGOTOP()
ou:
oTRB:gotop()

[clodoaldomonteiro]

Ainda não deu certo.
Minha função tá assim:

Código: Selecionar todos

         CASE carac_="F" .OR. carac_="Q"                      // filtra/quantifica
            cri_ant = criterio
            IF carac_="F"                                     // filtra
               FILTRA(.t.,.t.)                                // escolhe o filtro
               br_w:cargo := {criterio,cpord,chv_rela,INDEXORD(),cmr_}
               BR_W:gotop()  //coloquei como vc pediu.
               br_w:refreshall()                              // refaz toda a tela
               IF cri_ant!=criterio.AND.!EMPTY(criterio)      // se alterou o filtro
                  grava_db=.t.                                // seta flag de consulta alterada
               ENDI
            ELSE                                              // quantifica
               FILTRA(.f.)                                    // so' monta a expressao
               condq=criterio                                 // retorna filtro anterior
               criterio = cri_ant
            ENDI
            brw_reg=RECN()                                    // salva registro atual
            MONTABRW()                                        // remonta janela de visualizacao

[sygecom]

Tente colocar o Gotop() depois do:
MONTABRW()
Ou tente postar a rotina completa para que eu possa testar aqui.

[clodoaldomonteiro]

Mandei o projeto completo para teu email.

[sygecom]

Acabei de ver, vou dar uma olhada.

[sygecom]

Tchê, olhei aqui e não consegui simular o seu problema, fui na opção de consulta banco e ele apenas não mostrou nada. Fiz o teste no seu próprio EXE.