Information générale
Catégorie:
Gestionnaire d'écran & Écrans
John
Of course, this code works in my application.
Be sure:
Toolbar class have SHOWWINDOW property set to 1 (In Top-Level form) -(I think your mistake here)
Createobject() placed in Activate top-level form event.
Denis
>Dennis did you try your code? That's what I had but I get the toolbar 'behind' the top level form. When you click the toolbar it minimizes the form. Also _Screen.ActiveForm in code in the toolbar returns an error trying to access the form. Thanks
>
>>>Will toolbars not work with top level forms? If not, why? Or am I doing something wrong? Thanks
>>
>>Hi.
>>Toolbar is successfully works with toplevel form.
>>Create toolbar class 'clsToolbar'
>>Create custom form
>>add to form custom oToolbar property
>>In form Activate event write code
>>
>>IF type('THIS.oToolbar')!='O' OR ISNULL(THIS.oToolbar)
>> THIS.oToolbar = CREATEOBJECT('clsToolbar')
>> THIS.oToolbar.Visible = .t.
>>ENDIF
>>
>>Denis
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement