Mike Yearwood
Toronto, Ontario, Canada
General information
Category:
Coding, syntax & commands
Hi João
You can create an object with an array property. Connect this object to your form. Then you can pass this object to the prg.
**************************************************
*-- Form: form1 (c:\dev\sd\junk5.scx)
*-- ParentClass: form
*-- BaseClass: form
*-- Time Stamp: 09/26/04 09:51:10 AM
*
DEFINE CLASS form1 AS form
DoCreate = .T.
Caption = "Form1"
Name = "Form1"
PROCEDURE Init
THISFORM.AddProperty("ioFields",CREATEOBJECT("Custom"))
THISFORM.ioFields.AddProperty("iaFieldsName[1]")
USE YOURTABLE
AFIELDS(THISFORM.ioFields.iaFieldsName)
DO JUNK5 WITH THISFORM.ioFields
ENDPROC
ENDDEFINE
*
*-- EndDefine: form1
**************************************************
*JUNK5.PRG
LPARAMETERS m.toFields
LOCAL m.lnI
WITH m.toFields
FOR m.lnI = 1 TO ALEN(.iaFieldsName,1)
?.iaFieldsName[m.lnI,1]
ENDFOR
ENDWITH
>I have an Array, in my form property like aFieldsName[1,0], i fill it with ALINES with an expression "joao,carlos,jose", now i need to pass it by reference to a prg, like MyTest("Test",myArray).
>
>How can i do that?
>
>João Batista
Previous
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only