Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Set and Get appl obj property good practice
Message
From
31/07/2009 12:42:47
 
 
To
31/07/2009 10:48:29
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01415630
Message ID:
01415689
Views:
54
Thank you for your input, Tore.

>I use this class for similar approaches. The class wil automatically create the properties for you.
>
>_screen.AddProperty('memo',CreateObject('parameterX'))
>_screen.memo.xx=10
>_screen.memo.yy='Some text'
>?_screen.memo.yy
>?_screen.memo.xx
>
>define class ParameterX as custom
>  function This_Access(tcMember)
>    if type('This.' + tcMember) = 'U'
>      This.AddProperty(tcMember)
>    endif
>    return This
>  EndFunc 
>  function AddVar(tcMember,tcData)
>      AddProperty(this,tcMember,tcData)
>    return This
>  endfunc
>EndDefine
>
>
>
>
>
>>Hi,
>>
>>I need to add about 10 (max) propertied to the application object. These properties will hold names of various meta tables of the application. Then, in many places of the application, this values will be retrieved and used. I know of two approaches
>>
>>1. Create a separate property for each one of the meta names (e.g. "MyMetaTbl1", "MyMetaTbl2", etc.). Then I would have to have as many Get methods in the application object to retrieve these values (e.g. method GetMyMetaTbl1, method GetMyMetaTbl2, etc.
>>
>>2. Create an array property for the application object with number of elements corresponding to the number of meta table names I need to store. Then I can have just one method of getting the values (e.g. GetMetaTableName(nEle))
>>
>>I am leaning toward the approach 2 but want to be sure that I am not going to miss something
>>
>>What is a better practices?
"The creative process is nothing but a series of crises." Isaac Bashevis Singer
"My experience is that as soon as people are old enough to know better, they don't know anything at all." Oscar Wilde
"If a nation values anything more than freedom, it will lose its freedom; and the irony of it is that if it is comfort or money that it values more, it will lose that too." W.Somerset Maugham
Previous
Reply
Map
View

Click here to load this message in the networking platform