Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to find where a control is used?
Message
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9 SP1
Divers
Thread ID:
01214200
Message ID:
01214528
Vues:
21
>>
>>Add Files after ActiveProject, e.g.
>>
_VFP.ActiveProject.Files
>>
>>That will teach me for a moment to think before answering.
>
>Adding .Files does the job. But I don't find any references still. In Tamar's code she uses .Type = "K". I believe I use this control in containers only. Do you know if I can change the Type from "K" to "?" to look for containers?
>
>Thank you for your help.
>
>P.S. I don't understand what do you mean by saying "will teach me for a moment ...." You didn't say anything wrong.

I didn't try the code and didn't really read it.

K is for form's only. I also added V for VCX.
FOR EACH oFile in _VFP.ActiveProject.Files 
  IF oFile.Type $ "KV" && form
     USE (oFile.Name) ALIAS __FORM
     SCAN FOR __FORM.Class = 'ccombobox'
         =MESSAGEBOX(__Form.Objname)
     ENDSCAN

     USE IN select("__FORM")
  ENDIF
ENDFOR
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform