>>My program is callin the Form like suggested in the thread 'Do Form With param1 To Var'
>>
>>Not sure how to implement your suggestion. Can you express in a small example?
>
>I implemented msgsing between objects - this saves me the need to have anything modal, but a little too compilcated to go into here
>but as for passing parameters, here is a simple example
>(you can do the same with SCX based forms )
>
>
>
>loParam=CreateObject("params")
>myForm=createObject("formclass",loParam)
>
>? loParam.nSomeValue
>myForm.Show(1)
>? loParam.nSomeValue
>
>DEFINE CLASS Params as Custom
> nSomeValue=0
>ENDDEFINE
>
>DEFINE CLASS formclass as form
> oParam=.null.
>
> PROCEDURE Init
> LPARAMETERS toParam
> this.oParam=toParam
> ENDPROC
>
> PROCEDURE QueryUnload
> this.oParam.nSomeValue=10
> this.oParam=.null.
> ENDPROC
>ENDDEFINE
>


Thanks Arnon
I'll add that to my bag of tricks

Russ