FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Update the Message bar
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
Update the Message bar
Posted: Mon Jul 16, 2007 07: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

Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Update the Message bar
Posted: Mon Jul 16, 2007 08:24 PM

Rick:

Just redraw the message bar after your vars are updated.

SET MESSAGE OF oWind to xMESSAGE CLOCK

Regards

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
Update the Message bar
Posted: Mon Jul 16, 2007 08: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

Posts: 663
Joined: Mon Dec 05, 2005 11:22 PM
Update the Message bar
Posted: Mon Jul 16, 2007 09: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 )

Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
Update the Message bar
Posted: Mon Jul 16, 2007 10:33 PM

Gale

Sorry .. could not get you code to work :x .. However I am happy with re-issuing the native code.

Rick Lipkin

Posts: 663
Joined: Mon Dec 05, 2005 11:22 PM
Update the Message bar
Posted: Mon Jul 16, 2007 10:54 PM

Sorry your window var was oWind not oWnd.

Anyway glad you are ok.

Continue the discussion