Discussion :

[Nzs26]

Bonjour,

Mon application est développéeen MDI. Les différentes feuilles sont accessibles par le biais d'un menu, gérer par un Action Manager.

Une feuille de connexion permet d'attribuer différents droits selon la fonction de l'utilisateur. La gestion des droits donne lieu à l'accessibilité de certains liens dans le menu :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonAction.Enabled := true;

Quand les droits ne donnent pas accès à un feuille, l'action est à ce statut :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonAction.Enabled := false;

Alors mon problème : je possède une feuille de connexion reliée à une base de données qui vérifie le login, le mot de passe et récupère le niveau des droits : 0, 1, 2, 10.

Selon le niveau extrait, les actions sont gérées différemment :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
        if self.zsDroit.Text = '0' then
          begin
            showmessage('lecture');
            frmMain.actParamCtrl.Enabled := false;
            frmMain.actSaisieCtrl.Enabled := true;
            frmMain.actCreateCtrl.Enabled := false;
            frmMain.actLog.Enabled := true;
            frmMain.actDeLog.Enabled := true;
            frmctrlmp.actAnnuler.Enabled := false;
            frmctrlmp.actAjouter.Enabled := false;
            frmctrlmp.actModifier.Enabled := false;
            frmctrlmp.actSupprimer.Enabled := false;
            frmctrlmp.actValider.Enabled :=  false;
            frmctrlmp.actCloturer.Enabled := false;
            frmctrlmp.actAjouterRecep.Enabled := false;
            frmctrlmp.actModifierRecep.Enabled := false;
            frmctrlmp.actSupprimerRecep.Enabled := false;
            frmctrlmp.actValiderRecep.Enabled := false;
            frmctrlmp.actAjouterRecep.Enabled := false;
          end;

Les actions de la feuille frmMain sont gérées sans problème mais celles de frmctrlmp non. J'obtient une erreur de mémoire ( comprenant uniquement des chiffres et des lettres donc problème d'adressage mémoire du système d'exploitation).

J'ai précisé dans la partie uses :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
implementation
 
uses uMain, _uData, uCtrlmp;

Pour moi, l'erreur viens du fait que je modifie les propriétés d'une feuille qui n'est pas encore créé : je créais et détruis la feuille en fonction de la volonté de l'utilisateur ( click dans le menu ).

Je souhaite continuer à utiliser ce système de gestion des feuilles ( création et destruction ) mais du coup je ne vois pas comment résoudre mon problème !

Si vous avez la moindre idée, je suis preneuse !

NZs

[philnext]

Bon je ne suis pas certain d'avoir compris ...
Pour ce genre de problème je te conseille de créer TOUTES les Forms utilisables et ensuite de gérer leur accès au niveau de l'action (ou en dévalidant le bouton qui permet d'y accéder).

[Nzs26]

Je dévalide lors de la création d'une feuille le bouton qui permettait d'y accéder.

Je ne vois aussi que la solution de créer les feuilles lors de l'attribution des droits et de les détruires si changement de droits, mais je me demandais si la mémoire allouée ne serait pas plus importante en conséquent ? Et donc si au niveau optimisation c'était 'bien' ou pas

Et il me semble bien que tu as compris mon problème car tu n'a pas répondu totalement à côté !

NZs

[Nzs26]

Je viens de tester en créant mes feuilles dès l'attributions des droits mais cela ne convient pas parce que toutes les feuilles s'ouvrent alors et je ne peux pas les cachers car l'application est développée en MDI.

Or je voudrais qu'après s'être connecté, l'utilisateur se retrouve sur ma feuille principale sur lequel a été intégré le menu.

Je vois plus trop comment je pourrais faire du coup

[banban54]

bonsoir!

et en mettant le code dans le OnCreate de la dernière form crée?

à plus

[Nzs26]

Ben je vois pas trop comment faire car le code change en fonction des droits attribués. Et surtout que je ne veux créer aucune feuilles à l'avance pour qu'elles ne s'affichent pas !

[philnext]

Je n'utilise jamais le MDI mais ne peux tu mettre un visible := false dans le OnCreate des Feuilles.
Tu passes le visible := true quand on appuie sur le bouton...

[Nzs26]

C'est une bonne idée, je vais tester ce passe pas, cette méthode pourrait palier à la propriété hide du coup je ne sais même pas pourquoi je n'y ai pas pensé avant !

[Nzs26]

Bon, j'obtient le message d'erreur :

Impossible de cacher une fiche en MDI

[Nzs26]

J'ai mal exprimé mon problème ou personne n'a de solution ?

Pourtant, il doit bien il y avoir une technique !

[valer]

Moi aussi j'ai une application avec un menu qui s'affiche en fonction des utilisateurs. les liens de mon menu sont dans une table que j'ai appelé droits. La feuille principale est celle de connexion. Quand l'utilisateur saisie son mot de passe et son login. Ses droits sont recherchés dans la table droit. ses données sont récupérées et envoie à l'évenement onshow de la fiche menu qui l'active correctement. Si ça ne va pas toujours je peux te filer mon code pour que tu voies un peu. Bien sûr ce sera avec la BD.

[Nzs26]

Merci pour le principe.

Je vous un peu mieux le principe, je suppose que je peux aussi le réalisé si je démarrage sur ma page principale et qu'ensuite j'ouvre une fenêtre de connexion ?

Sinon moi aussi et pour gérer les droits ensuite à l'intérieur des feuilles : une feuille doit s'afficher un coup avec tous les boutons et un coup sans tous les boutons en fonction des droits. Dois-je alors inclure une variable générale à l'application, sur le OnCreate, je réalise une condition : si le droit et ainsi alors appeler telle procédure et sinon appeler celle-la ?

Merci

NZs

[valer]

En fait mon programme gère un magasin de vente. Le principe est simple. Il ne peut ouvrir que les fiches donc on lui a donné les droits. ça m'évite de coder les boutons. Je fais le test juste une fois et ça suffit quant il se logue. Là j'ai mis différement les interfaces de saisie et de consultation. ça permet qu'en fonction des utilisateurs tu peux juste consulter. Par exemple celui qui facture peut voir la quantité disponible mais pas la modifier.

[Nzs26]

D'accord!
Je suis partie un peu sur ce principe.

L'application est démarrer, seul un formulaire peut être consulté ( en mode sans bouton). L'utilisateur peut aller se connecter. Je stock alors la valeur du droit dans une variable globale à l'application.

Ensuite, sur chaque feuille je fais un test selon le droit ( IF ) et j'affiche différentes parties graphique en fonction de ma condition.

Voila

Merci à vous :p

NZs