Perhaps the 'ReadMethod' & 'WriteMethod' Methods?
Grab a design time reference to the form with:
=ASELOBJ(gaobj,1)
Then iterate through the controls and use the 'ReadMethod' to get the pre-existent code into a variable and concatenate your additional code:
LcDesiredCode = “THISFORM.mcalendorse=.T.” + CHR(13) ;
+ oControl.ReadMethod(“VALID”)
oControl.WriteMethod(“VALID”, LcDesiredCode)
Thank you,
- Frank
