Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
GetMethod()
Message
De
25/03/2002 12:05:29
 
 
À
24/03/2002 09:02:59
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00636499
Message ID:
00636891
Vues:
20
Hi Glenn,
Sorry you misunderstood me. I don't have an object selected. I'm just editing the code in a form and would like to be able to put the object.parent info of the method that I'm editing into a prg to analyze, without going out and selecting the object.


>Hi Bill,
>
>I think I would like to re-locate to LVNV in a few years, I hope there will be room for one more VFP'r anyway here you go:
>
>LOCAL laObj(1), lcHierarchy, loObj
>
>= ASELOBJ(laObj)
>lcHierarchy = laObj(1).name
>loObj = laObj(1)
>DO WHILE TYPE('loObj.parent.name') = 'C'
>	lcHierarchy = loObj.Parent.Name + '.' + lcHierarchy
>	loObj = loObj.parent
>ENDDO
>
>? lcHierarchy
>
>
>Glenn
Bill Morris
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform