Information générale
Catégorie:
Gestionnaire d'écran & Écrans
Just a reminder note:
We developed a security system where we can make all controls R/W; R only; or Invisible based on user's permissions. We found that all object's have a TAG property and use that to hold refrence to sercurity. Issues we had were with a Container object since the ENABLED property does not exist. This is what a PageFrame is, so you will need to have a method to drill down in all containers and pageframes to check the rights to its objects. We also needed to drill down in side of Grids as well to make some cells Visible or R-Only based on rights. Just wanted you to think of not only PageFrames but also any Container on your Form
>If a user has read-only rights, I want to disable fields on a form. I am using the following code to do this:
>
>FOR i = 1 TO THISFORM.CONTROLCOUNT
> IF INLIST(THISFORM.CONTROLS(i).BASECLASS, 'Checkbox','Textbox', 'Combobox')
> THISFORM.CONTROLS(i).ENABLED = .F.
> ENDIF
>ENDFOR
>
>This works great...except for any fields on a Pageframe on the form. Any ideas how to disable those fields without specifying each field individually?
>
>Thanks,
>Doug
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement