Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Toolbar
Message
De
22/11/2001 07:03:52
Alexandre Palma
Harms Software, Inc.
Alverca, Portugal
 
 
À
22/11/2001 06:44:39
Emerson Reed
Folhamatic Tecnologia Em Sistemas
Americana - São Paulo, Brésil
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
00584836
Message ID:
00584865
Vues:
42
This message has been marked as the solution to the initial question of the thread.
That depends of how are you using the toolbars for example you have a form that enables the user to chose the toolbars that he whants like vfp office
on the init of the form you can do the following:
Thisform.chk.standard.Value = (VARTYPE(omymainform.oToolStandard) = 'O')
*do simillars to the other's toolbars.
Now on the Release of the form fo the following:
IF Thisform.chk.standard.Value
  IF VARTYPE(omymainform.oToolStandard) # 'O'
    omymainform.ADDOBJECT('oToolStandard', 'mystandardtoolbarclass')
    omymainform.oToolStandard.Visible = .t.
  ENDIF
ELSE
   IF VARTYPE(omymainform.oToolStandard) # 'O'
     omymainform.REMOVEOBJECT('oToolStandard')
   ENDIF
ENDIF
*do simillars to the other's toolbars.
>I need to create a function that verifies if the toolbar wasn't released. If yes, I'll create a new instance of my toolbar... I thought that I had a more easy way to do this!
>Do you have any other idea?
>
>Emerson Santon Reed
>emerson@folhamatic.com.br
Alexandre Palma
Senior Application Architect
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform