Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
TbrLaunchPad
Message
General information
Forum:
Visual FoxPro
Category:
CodeMine
Title:
TbrLaunchPad
Miscellaneous
Thread ID:
00690723
Message ID:
00690723
Views:
48
Hi there.

Is there anybody there ? Or you've all gonne somewhere and didn't tell me ?

Anyway, here is another help needed.

I have some buttons in my tbrLaunchPad, which launches some forms. I also put a Logon/Logoff (chkToolIndicatorButtonLogon) in it as well, so the user can just logoff once it leaves the desk, or if someone else comes to use the application, they can logoff and logon with their username. Created all the priviledges and distributed them to the button's respective cReadPriviledge.

It works fine when there's a logon, and the buttons get enabled/disabled according to the user's priviledges. But it doesn't get refreshed when a logoff occurs, as there's usually no form active on the desktop.

So, I created this code in the Click event of the Button Logon :

DODEFAULT()
THISFORM.oApp.AddRemoveBars()
IF NOT THISFORM.oSecurity.IsLoggedOn() AND EMPTY(WONTOP())
DEFINE WINDOW test FROM -1000,-1000 TO -990,-990 NAME oTest
oTest.SHOW()
oTest.RELEASE()
ENDIF

AddRemoveBars will get rid of the menu bars the user has not priviledges to.
And then, if a logoff ocurred and there's no window active, I defined one out of bounds of the desktop, showed, and released it, and then the LaunchPad got refreshed. It seems a bit strange, though.

Any ideas on how I could refresh the LaunchPad toolbar when a logoff occurs without any active form ?

Obrigado.
Ivan
Next
Reply
Map
View

Click here to load this message in the networking platform