Update the Message bar

Rick Lipkin · Post by **Rick Lipkin** » Mon Jul 16, 2007 7:03 pm

To All

I have a message bar :

xMESSAGE := "User "+xLOGIN+" Rights "+cRIGHTS+ ;
" Default= "+cDEFA+" Rdd= "+cRDD+ ;
" Revision "+DTOC(dEXE)+;
" -r"+str(nSCR1,4)+" x "+STR(nSCR2,4)

SET MESSAGE OF oWind ;
to xMESSAGE CLOCK

How can I update the message bar when one of my variables change ?

Rick Lipkin

Armando · Post by **Armando** » Mon Jul 16, 2007 8:24 pm

Rick:

Just redraw the message bar after your vars are updated.

SET MESSAGE OF oWind to xMESSAGE CLOCK

Regards

Rick Lipkin · Post by **Rick Lipkin** » Mon Jul 16, 2007 8:54 pm

Armondo

You got me in the right direction .. I had to look at the .ppo and then I inserted the native code in my button :

oWind:oMsgBar := TMsgBar():New(oWind,xMESSAGE,.F.,.T.,.F.,.F.,,,,)

and the above worked !!

Thanks
Rick Lipkin

Gale FORd · Post by **Gale FORd** » Mon Jul 16, 2007 9:07 pm

How about

SET MESSAGE OF oWnd TO "First Text"

oWnd:oMsgBar:KeybOn()
oWnd:oMsgBar:ClockOn()
oWnd:oMsgBar:DateOn()
cText := 'Second Text'
oWnd:oMsgBar:SetText( cText )

Rick Lipkin · Post by **Rick Lipkin** » Mon Jul 16, 2007 10:33 pm

Gale

Sorry .. could not get you code to work

.. However I am happy with re-issuing the native code.

Rick Lipkin

Gale FORd · Post by **Gale FORd** » Mon Jul 16, 2007 10:54 pm

Sorry your window var was oWind not oWnd.

Anyway glad you are ok.