>>this.AddProperty('omySQLData',CREATEOBJECT('app_data_env_mySQL'))>>
Define Class App_Data_Env_mySQL As Custom >> >> Dimension aUPDFieldNames[1] >> Dimension aUPDFieldValues[1] >> >> cTableName = Space(0) >> cUPDCondition = Space(0) >> cTableOperation = Space(0) >> IsTest = VARTYPE(rlpIstest)="L" AND rlpIsTest >> ofrmBase = .Null. >> >>**-------------------------------------------------------------------- >> Hidden Function Init() HelpString 'Does when the object is created' >> >> This.ofrmBase = Createobject('frmBase') >> etc. >> Return .T. >> >> Endfunc >>>>rlpIstest is public variable set in my test version of the calling program.
thisform.oMySqlData = .NULL.but that doesn't seem to have helped. I resolved this issue by putting
this.IsTest = VARTYPE(rlpIstest)="L" AND rlpIsTestin the init method of the class but I'm curious as to why it retains the original value the second time it is instantiated.