>>if This.lSaveFormSettings >> if vartype(goApp) = "O" and !isnull(goApp) >> goApp.SaveFormSettings(This) >> endif >>endif>>I also have a form property called lSaveFormSettings that is set to FALSE if I do not want to enable this feature for the current form. goApp is my global application object. This method actually does some minor stuff then calls another method in a PRG based class that does all the saving of the form environment. Since I pass an object reference to the form, I can get to any object and property on the form.
if vartype(oApp) = "O" and !isnull(oApp) and (This.lSetFormSettings or oApp.Language <> ENGLISH_VERSION) oApp.SetFormSettings(This) endifI save all the settings in a table. I have a field for UserID [integer], FormName [M], and a memo field for general form properties like Top, Left, Height, Width. So multi-user is not a problem.