Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Parameter array
Message
 
 
À
09/11/2011 09:11:24
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Versions des environnements
Visual FoxPro:
VFP 5
OS:
Windows 7
Divers
Thread ID:
01528475
Message ID:
01528482
Vues:
113
This message has been marked as the solution to the initial question of the thread.
No parameter array in VFP. The closest you can get
foo('one', 'two', 'three')

FUNCTION foo(luP1, luP2,luP3, luP4, luP5)
LOCAL lnPcount, lnI
lnPcount = PCOUNT()
LOCAL ARRAY laParam[lnPcount] 
FOR lnI=1 TO lnPcount
	laParam[lnI] = EVALUATE("luP" + TRANSFORM(lnI))
ENDFOR

FOR lnI=1 TO lnPcount
	? laParam[lnI]
ENDFOR


RETURN
>
>Is there a parameter array?
>
>
>foo('one', 'two', 'three')
>
>return
>
>Function foo(dog, cat, hen)
>
>? aPara(1)   &&displays 'one'
>? dog           &&displays 'one'
>? aPara(2)   &&displays 'two'
>? aPara(3)   &&displays 'three'
>
>
>return
>
--sb--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform