A final recommendation concerns "oPreference", as we've so far put it. It would be best if the preference engine were abstracted, and certainly it'd be best if the preference engine wasn't hanging off a
global.
So how aboy this instead:
IF TYPE( "THIS.oPrefernce.BaseClass")= "C"
FOR EACH oControl in THIS.Controls
THIS.oPreference.Execute( oControl)
ENDFOR
ENDIFNow this makes the form class more reusable. Of course, now we need to make the connection between THIS.oPreference and the preference engine itself, which could also be handled in the Init(), but also consider making that an external process. If you do it in the init(), then the usual way to do that is use a cPreferenceEngine property in an expression like
IF !EMPTY( THIS.cPrefernceEngine)
THIS.oPreference= CREATE( THIS.cPrefernceEngine)
ENDIF
Just kick me if you're there already <s>.
