Class: | loginpicture |
IF login::Refresh() thisform.txtTitle.Value = title thisform.edtDescription.Value = Notes IF FILE(photo_file) thisform.imgPhoto.Picture = photo_file ELSE thisform.imgPhoto.Picture = '' ENDIF thisform.txtDispPswd.Value = password thisform.txtUserLevel.Value = thisform.GetUserLevel() ELSE STORE "" TO ; thisform.txtTitle.Value, ; thisform.edtDescription.Value, ; thisform.imgPhoto.Picture, ; thisform.txtDispPswd.Value thisform.txtUserLevel.Value ENDIF