Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Form Properties or Form Collection
Message
De
28/04/2008 13:28:30
 
 
À
28/04/2008 13:19:56
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 9 SP2
Divers
Thread ID:
01313565
Message ID:
01313566
Vues:
33
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?
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform