>>
>>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"
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