FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Refresh xBrowse
Posts: 34
Joined: Thu Jun 22, 2006 02:33 PM
Refresh xBrowse
Posted: Mon Jun 02, 2008 06:51 PM

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

Marcelo Michels Alexandre

xHarbour 1.1 + Ws + Xmate + FW8.01 + BCC 5.82
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Refresh xBrowse
Posted: Mon Jun 02, 2008 07:58 PM

Por ejemplo:

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

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 34
Joined: Thu Jun 22, 2006 02:33 PM
Refresh xBrowse
Posted: Mon Jun 02, 2008 08:01 PM

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

Marcelo Michels Alexandre

xHarbour 1.1 + Ws + Xmate + FW8.01 + BCC 5.82
Posts: 408
Joined: Sun Aug 13, 2006 05:38 AM
Refresh xBrowse
Posted: Tue Jun 03, 2008 12:30 AM

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

Saludos

Quique
Posts: 161
Joined: Wed Jan 25, 2006 10:45 AM
Refresh xBrowse
Posted: Tue Jun 03, 2008 01:43 AM
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.!
Saludos

Ricardo R.

xHarbour 1.1.0 Simplex , Microsoft Visual Studio 2008, Bcc55, Fwh Build. 9.01
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Refresh xBrowse
Posted: Tue Jun 03, 2008 02:35 AM
Para un agregado alcanza con esto:
IF (base)->(DBAPPEND())
   REPLACE ......
ENDIF
oBrw:SetFocus()
oBrw:UpStable()
oBrw:Refresh()

Y para una eliminacion con esto
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
Posts: 408
Joined: Sun Aug 13, 2006 05:38 AM
Refresh xBrowse
Posted: Tue Jun 03, 2008 02:56 AM
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
Saludos

Quique
Posts: 71
Joined: Mon Jan 28, 2008 11:18 AM
Refresh xBrowse
Posted: Tue Jun 03, 2008 11:23 AM

opa

pra atualizar txbrowse usando array apos adicionar ou excluir

oBrw:aArrayData := aSuaArray

Daniel Lopes Filho - Campo Grande,MS,Brasil
xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6693) + gtwvw + fw 10.2 + vsx e
fw pcc (ainda não usei)
msn : zazibr@hotmail.com

Continue the discussion