FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour set message vs statusbar
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM

set message vs statusbar

Posted: Sat Mar 11, 2006 03:51 PM

tengo una ventana con un browse y defino una barra de mensajes ....
cuando hago una busqueda incremental del browse me muestra lo que escribo en la barra de mensajes, y el browse se mueve automaticamente, todo esto funciona ok, pues resulta que quiero hacer lo mismo pero en lugar de usar la set message quiero usar la statusbar y no he podido, alguna pista de como hacerlo?
Gracias
Pako

____________________

Paco
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM

set message vs statusbar

Posted: Sat Mar 11, 2006 04:14 PM

se me olvido aclarar que la uso en una MDICHILD,aki dejo el codigo

DEFINE WINDOW oWndHija MDICHILD OF oWnd TITLE "Módulo de Control de Empresas"
DEFINE STATUSBAR oStatusBar PROMPTS cDefMsg OF oWndHija

@ 0,0 listbox oBEmp .....

oBEmp:bSeek := {|lRet| oBEmp:DbfSeek(.T.) }
oBEmp:bUpdateBuffer:= {|| UpBuffer( oWndHija:oStatusBar, ;
cDefMsg, oBEmp:cBuffer ) }

STATIC FUNCTION UpBuffer( oStatusBar, cDefMsg, cBuffer )
local cMsg

if Len( cBuffer ) > 0
   cMsg:= "Buscando: " + upper(cBuffer)
else
   cMsg:= cDefMsg
endif
oStatusBar:SetMsg( PadR( cMsg ,200) )

return Nil

y el programa falla este es el error:
error base/1004 message not found: TMDICHILD:OSTATUSBAR from errorsys, line: 0

Gracias
Pako

____________________

Paco
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM

set message vs statusbar

Posted: Sat Mar 11, 2006 04:20 PM

ya resuleto !!

Gracias.
Salu2.
Pako

____________________

Paco
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

set message vs statusbar

Posted: Sat Mar 11, 2006 07:35 PM

Paco,

bien! :)

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion