Filtro no xBrowse com array

Filtro no xBrowse com array

Postby EduardoSP6 » Fri Feb 17, 2017 11:59 am

Bom dia!

Estou executando um filtro no xBrowse com array usando o metodo ArrayIncrFilter, porém não consigo limpar o filtro estabelecido quando a variável de pesquisa está vazia.
Já tentei executar um setArray mas não funcionou.

Alguém teria uma dica para resolver ?

Segue como estou fazendo:

***********************************************************

* Get de pesquisa

REDEFINE GET oGet2 VAR cSeek PICTURE "@!" ID 4002 OF oDlgPrd2 UPDATE ;
VALID xBrFilter(oBr1, 3, cSeek, aProdAuto)


* listagem
oBr1:= TXBROWSE():NEW()
oBr1:CreateFromResource(4008)
oBr1:SetArray(aProdAuto,.T.)
...


***********************************************************

FUNCTION xBrFilter(oBrw, nCol, cSeek, aArray)
* Filtro no xbrowse com array de forma nativa. Filtra qualquer coluna no browse
* Parametros: objeto, n. da coluna, variavel de pesquisa

oBrw:lSeekWild := .T.
DEFAULT nCol := 1

IF !Empty(cSeek)

oBrw:cFilterFld:= nCol // seleciona a coluna que será ativado o filtro

oBrw:ArrayIncrFilter(RTRIM(cSeek))

ELSE
* limpa o filtro
oBrw:SetArray(aArray,.T.)
ENDIF

oBrw:Refresh()
oBrw:Update()

RETURN .T.
EduardoSP6
 
Posts: 3
Joined: Thu Sep 01, 2016 1:18 pm
Location: Rio de Janeiro - Brazil

Re: Filtro no xBrowse com array

Postby ORibeiro » Mon May 28, 2018 7:54 pm

Estou com o mesmo problema. Não consigo cancelar o filtro e voltar a mostrar a planilha original. Você descobriu como fazer isso?
Oscar Ribeiro
OASyS Informática
Fwh18.02 + xHarbour 1.2.3 + Bcc72
User avatar
ORibeiro
 
Posts: 187
Joined: Mon Oct 20, 2008 6:33 pm
Location: Itu, Sao Paulo, Brazil


Return to All products support

Who is online

Users browsing this forum: No registered users and 3 guests