Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Hiding Seperator Bars when Surrounding Bars not
Message
From
21/03/2003 15:21:39
 
General information
Forum:
Visual FoxPro
Category:
The Mere Mortals Framework
Miscellaneous
Thread ID:
00767824
Message ID:
00768755
Views:
21
Keven,

I added the code but nothing changed. The debugger showed the only method executed when the class is being created is the init event - show wasn't called.

Gary.

>Gary,
>
>The current version of the MM VFP doesn't support this, however, try adding the following code to the CSeparatorBar.Show() method:
>
>
>LPARAMETERS nStyle
>
>LOCAL llHideBar, loPrevBar
>
>DODEFAULT(nStyle)
>
>*--- If the bar is first in the list, hide it
>IF this.nbarnumber = 1
>	llHideBar = .T.
>ELSE
>	*--- If the previous bar is a separator, hide it
>	loPrevBar = this.Parent.Get(this.nbarnumber-1)
>	IF LOWER(loPrevBar.Class) = "cseparatorbar"
>		llHideBar = .T.
>	ENDIF
>ENDIF
>
>IF llHideBar
>	this.Hide()
>ENDIF
>
>
>Let me know how this works for you.
>
>Regards,
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform