Refresh xBrowse

[kbelo]

Ola.
Como faço para fazer um refresh na xbrowse apos adiciona um item tanto com vetores ou matrizes(array) quando com arquivos(dbf)?

[Manuel Aranda]

Por ejemplo:

REDEFINE BUTTONBMP oBtn[1] ID 104 OF oDlg;
ACTION (AltaRegistro(),oBrw:Refresh(),oBrw:SetFocus() );
BITMAP "NUEVO" PROMPT " Nuevo" TEXTRIGHT

[kbelo]

Amigo isso não funciona.
O refresh é o basico e com certeza isso ja tentei.

[quique]

No entiendo el portugues, pero si lo que quieres es posicionarte en el último registro puedes hacer un oBrw:gobottom() o eval( ::bBookMark, nRecNo ), donde nRecNo sería el número de registro o elemento de la matriz

[Ricardo Ramirez E.]

Quique :

Ola.
Como faço para fazer um refresh na xbrowse apos adiciona um item tanto com vetores ou matrizes(array) quando com arquivos(dbf)?

SET PORTUGUÊS ON
Hola.
Como hago para hacer un refresh en un xbrowse, despues de añadir un item, tanto en vectores como en archivos DBF.

Amigo isso não funciona.
O refresh é o basico e com certeza isso ja tentei.

SET PORTUGUÊS ON
Amigo eso no funciona.
El refresh es basico y eso ya probé


Saludos.!

[cmsoft]

Para un agregado alcanza con esto:

Code: Select all | Expand

IF (base)->(DBAPPEND())
   REPLACE ......
ENDIF
oBrw:SetFocus()
oBrw:UpStable()
oBrw:Refresh()

Y para una eliminacion con esto

Code: Select all | Expand

IF (base)->(RLOCK())
   (base)->(DBDELETE())
   (base)->(DBUNLOCK())
   (base)->(DBSKIP(1))
   oBrw:SetFocus()
   IF (base)->(EOF())
      oBrw:GoUp()
   ENDIF
ENDIF
oBrw:UpStable()
oBrw:Refresh()

Espero te sirva

[quique]

Ricardo:

Gracias por el SET PORTUGUES
Entonces cualquiera de las dos opciones que le dí debería funcionar (el oBrw:goBottom() depende del índice)

Corrijo la seguna opción
eval( oBrw:bBookMark, nRecNo )
oBrw:refresh()

cmsoft:

xBrowse aún no tiene implementado el upstable

[zazibr]

opa


pra atualizar txbrowse usando array apos adicionar ou excluir


oBrw:aArrayData := aSuaArray