Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Initialing Toolbars
Message
 
To
25/02/1997 16:40:36
Anderson Girardi
Athenas Automação de Escritório
Porto Alegre, Brazil
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00022010
Message ID:
00022030
Views:
47
>I would like to know how i do to initialize a toolbar when my aplication
>initialize?
>I can define a position?
>
>
>Anderson Reis Girardi Porto Alegre - RS Brasil

*SEE "Dock" DOC for the position of the bar

SET CLASSLIB TO MyLib.vcx ADDITIVE

*If you have an application class:

oApp.AddObject("MyToolBar","toolbar")
oApp.MyToolBar.Dock(0)
oApp.MyToolBar.Caption = "Toolbar"
oApp.MyToolBar.Show()

*else

oToolBar = CREATEOBJECT("toolbar")
IF TYPE("oToolBar") = "O"
oToolBar.Dock(0)
oToolBar.Caption = "Toolbar"
oToolBar.Show()
ELSE
=MessageBox("OOOPS!")
ENDIF

*endif
If we exchange an apple, we both get an apple.
But if we exchange an idea, we both get 2 ideas, cool...


Gérald Santerre
Independant programmer - internet or intranet stuff - always looking for contracts big or small :)
http://www.siteintranet.qc.ca
Previous
Reply
Map
View

Click here to load this message in the networking platform