Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Passing an array to a form
Message
From
29/06/1999 12:38:58
Bob Lucas
The WordWare Agency
Alberta, Canada
 
 
To
29/06/1999 11:40:06
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00235291
Message ID:
00235318
Views:
15
Hi John

I use a real simple custom class that has one property, an array. I use this mostly for passing parameters to forms. When I create the class, I pass one parameter which is the number of dimensions for the array. I can then pass the object around (and they array with it!) without having to worrry of handling arrays.

ox = createobject("FormParms", 5)
ox.acdata[1] = 'Parameter 1'
...etc.

*-- usually a modal form getting input
DO FORM GetInput WITH ox


DEFINE CLASS FormParms AS CUSTOM

*-- Custom properties
DIMENSION acdata(1)

PROCEDURE INIT
LPARAMETER ncnt

IF TYPE("ncnt") != "N"
RETURN
ENDIF

DIMENSION this.acdata[ncnt]
RETURN

ENDDEFINE




>Hi gang!
>
>OK...have a situation that I could use some "been there, done that" advice on. I have a selection form and I'd like to store the selected values to an array. I'd like to create the array in the calling method and pass it to the form. I've tried:
>
>PUBLIC ARRAY aSelected[1]
>DO FORM frmSelector WITH @aSelected
>
>But it bombs. Doesn't like the Byref "@" sign. And I don't like the idea of declaring public memvars to begin with.
>
>Any suggestions on an alternative architecture? I have it working with PUBLIC ARRAY aSelected[1] and then hard-wiring the reference to aSelected in frmSelector but I don't like to hard-wire memvar references.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform