Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Scroll bars and formsets
Message
De
04/12/2006 18:30:14
 
 
À
04/12/2006 18:00:12
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
01174483
Message ID:
01174799
Vues:
7
That's got it Fred. Thanks a million. I don't know what I'd do without the UT.
Grady

>>Thank you Tore and Fred! I've been sweating over this little turkey for a couple of days. I'm sure it was very simple for you, but this is my first hardcore use of classes and it was driving me nuts.
>>
>>Here is the code I chose to use. Rest assured I shall store it away and not bother anyone again with this request.
>>
>>_SCREEN.AddProperty("oToolBar")
>>_SCREEN.oToolBar = NEWOBJECT('mytoolbar','mylib.vcx')
>>
>>As you can see I changed the name of the toolbar.
>>
>>I still have one more tiny problem. The code under my toolbar's command button needs to refer back to objects on the form on which the toolbar is being used. Here is the button code at this point.
>>
>>LOCAL ShapeID
>>ShapeID = ""
>>SELECT localcrime1
>>Scan For Alltrim(crimetype) <> "Vandalism"
>>	ShapeID = localcrime1.shapename
>>	Thisform.Grove.RemoveObject(ShapeID)
>>ENDSCAN
>>this.mytoolbar.hide()
>>
>>The name of the form is 'Grove'. There needs to be a referrence to the form so that the code can act on the form's image and remove the unwanted objects, but I haven't had success yet. I can get the code to remove the objects if I run it within the forms methods, but as soon as I run it from the toolbar it won't even recognize the shape's names. How is this done?
>>Grady
>
>
>You can use _SCREEN.ActiveForm as the object reference to the active form from your toolbar class objects.
I ain't skeert of nuttin eh?
Yikes! What was that?
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform