Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
VFP 7 Beta 1 Formcount and _SCREEN
Message
 
To
26/06/2001 14:26:14
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00523544
Message ID:
00523741
Views:
12
>>>Mark,
>>>You should go a little deep to reach form ref :
>>>
FOR EACH oObject IN _vfp.objects
>>> FOR EACH oSub IN oObject.Objects
>>>  FOR EACH oSub1 IN oObject.Objects
>>>   IF oSub1.Baseclass = 'Form'
>>>     ? oSub1.Caption
>>>   endif
>>>  endfor
>>> endfor
>>>endfor
However I use a simplier one I forgot to say :
>>>
>>>ON KEY LABEL 'f2' oForm1 = SYS(1270)
>>>ON KEY LABEL 'f3' oForm2 = SYS(1270)
>>>ON KEY LABEL 'f4' oForm3 = SYS(1270)
>>>
>>>Go on forms I desire and 'F2','F3','f4'...
>>>Cetin
>>
>>Cetin,
>>
>>How in blue blazes did you find that? When I saw your post (and knowing you as I do), I said, "OK, he's knows something here", and went off trying to find out (via the usual sources). Nothing! Objects isn't documented anywhere in the MSDN Library. I tried the debugger (and something slightly similar to your code above). All I saw was the Objects property. C'mon, share. How did you find this?:-)
>
>:) Hi buddy,
>First of all sorry for the extra loop. When saying go a little deep I didn't mean that much but my fingers don't follow my brain :)
>Actually it's from VFP5 udfobjcollector. When I started t build FoxyClasses it was one of my big helpers. There I noticed that if toplevel container was not a form collecting members via amembers() was impossible. So I thought what Application and _VFP objects hold. Just tried them in debugger and voila they had collections. Looking closely it more resembled a VB style < bg > and thought word-excel way to reach what I want :)

Cetin,

Well, nice detective work, my friend. My own skills in this area must be slipping. For example, I had clicked on the FoxyClasses banner, and, of course got the site. Then I noticed not only the reference to it in your sig, but the fact that your company name now appeared as if I had been there. Then I finally figured out the connection.

Hope it's doing well.
George

Ubi caritas et amor, deus ibi est
Previous
Reply
Map
View

Click here to load this message in the networking platform