Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Form Properties or Form Collection
Message
From
28/04/2008 13:28:30
 
 
To
28/04/2008 13:19:56
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 9 SP2
Miscellaneous
Thread ID:
01313565
Message ID:
01313566
Views:
31
I use one or more "parameterx" objects to store variables. The object checks if a property exists, and if not, it creates it.
If Vartype(ofakt)#'O'
  oMemo=CreateObject('parameterX')
EndIf 
oMemo.nInvoice=lnInvoice
oMemo.lShowprice=llShowprice
oMemo.lLogo=.T.
oMemo.cJob=''
....

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
>Not sure if I'm putting this correctly, but I found myself putting a number of properties on a form that contained patient demographic data that was passed into the form. Would it be better to create a form array (object, collection?) that contained all the different properties for the patient? How would I do that? I know how to creat a form array, but is there a different/better way to have a collection of items that will need to be in scope for the entire form?
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform