Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Main container - how to detect it?
Message
From
08/11/2003 21:06:15
John Jones
Kuala Lumpur, Malaysia
 
 
To
08/11/2003 20:36:13
Michel Fournier
Level Extreme Inc.
Petit-Rocher, New Brunswick, Canada
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Re: Main container - how to detect it?
Miscellaneous
Thread ID:
00848006
Message ID:
00848012
Views:
12
Hi,
May be ..this can helps..
loParent = THIS
llGotParent = .F.

DO WHILE .T.
  IF TYPE("loParent.PARENT") = "O"
     loParent = loParent.PARENT
     llGotParent = .T.
  ELSE
     *-- Top most parent
     EXIT
  ENDIF
ENDDO

IF llGotParent
  ?loParent.NAME
ENDIF
HTH
I am not the most powerful man in this world.
I am not the worst man in this world either.
I just as same as all of you.
I still need to learn from my mistakes...
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform