Busqueda incremental y StatusBar
Posted: Mon Dec 24, 2007 7:48 pm
A ver si alguien sabe como:
Necesito mostrar en el StatusBar el valor que estoy manejando en una busqueda incremental en un twbrowse. Revise samples\StBar.prg y parece que lo hice, pero me muestra muchos simbolos extraños....
Coloque que el metodo bKeyDown del wBrowse evaluara esto:
donde cZoek es la variable de busqueda incremental.
Pero no consigo esto. Con el MsgBar estaba bien, pero me interesa utilizar StatusBar.
Gracias anticipadas...
Necesito mostrar en el StatusBar el valor que estoy manejando en una busqueda incremental en un twbrowse. Revise samples\StBar.prg y parece que lo hice, pero me muestra muchos simbolos extraños....
Coloque que el metodo bKeyDown del wBrowse evaluara esto:
Code: Select all
IF !EMPTY(cZoek)
IF INDEXORD() # 0
bMsg := &("{||oStatusBar:SetPartText(3,'"+PADR("Buscando a >"+cZoek+"<",40)+"')}")
EVAL( bMsg )
DBSeek( cZoek )
IF Found()
IF nRecNo#RECNO()
oLbx:Refresh()
ENDIF
nRecNo := RECNO()
ELSE
DBGoTo( nRecNo )
oLbx:Refresh()
ENDIF
ENDIF
ELSE
oStatusBar:SetPartText(3," ")
CLR_BLACK,, .t. )
ENDIF
Pero no consigo esto. Con el MsgBar estaba bien, pero me interesa utilizar StatusBar.
Gracias anticipadas...