Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Toolbar
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00202867
Message ID:
00202915
Vues:
23
>Hi There,
>
>Is there a way that I can dock the toolbar in the form?
>
>Thanks in advance
>>You can do this.
>
>>Add a custom property to your SDI to hold the toolbar object in the scope of the form object. ie. add property oToolBar to
the SDI
>
>>Create a custom method in the SDI like sdi.showtoolbar() with the following:
>
>>set classlib to mytoolbarclass additive
>>if type('this.oToolBar') # "O"
>>this.oToolBar = createobject('mytoolbar',this)
>>this.oToolBar.show()
>>endif
>
>>Create a toolbar custom class from baseclass 'toolbar' with showwindow as 'In Top Level Form' and save in mytoolbarclass:
>
>>Create a custom property in the mytoolbar class mytoolbar.oFormRef
>In the init method of the toolbar class put the following:
>
>>lparameters pcFormRef
>>if type('pcFormRef') != "O"
>>* Some message
>>return .F.
>>else
>>this.oFormRef = pcFormRef
>>endif
>
>>In your menu, include a pad View with a dropdown that calls thisform.showtoolbar()
>
>>GOTCHA: You can't launch the toolbar in thisform.Init() because thisform does not yet exist. Therefore use the menu or a
button or some tricky thing like mousemove()... ;)
>
>>The reference passed as a parameter to the toolbar is only for making calls to the form from objects on the toolbar easier. For
example, a button.click() on the toolbar cannot reference the SDI simply by saying thisform.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform