Page 1 of 1

set message vs statusbar

Posted: Sat Mar 11, 2006 3:51 pm
by Francisco Horta
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

Posted: Sat Mar 11, 2006 4:14 pm
by Francisco Horta
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

Posted: Sat Mar 11, 2006 4:20 pm
by Francisco Horta
ya resuleto !!

Gracias.
Salu2.
Pako

Posted: Sat Mar 11, 2006 7:35 pm
by Antonio Linares
Paco,

bien! :)