Discussion :

[valer]

Bonjour j'utilise Delphi6 et je me connecte à ma base de donnée avec BDE. Toutes les connexions sont bonnes et marchent comme je veux.
J'aimerais savoir comment personaliser mon menu par rapport à chaque utilisateur si bien que chaque utilisateur ne puisse avoir que les options du menu qui lui seront attribuées lors de sa création. J'aimerais savoir comment quadriller TStrindrid.
Amicalement

[touhami]

Bonjour,
pour la personalisation du Menu c'est simple :
Dans l'evenement on show de la Form principale tu teste les droits de ton utilisateur , je ne sais pas comment tu sauvegarde les droit de ton utilisateur (est ce que dans une table paradox , access , Fichier ini ....?????)
de toute façcon voici un idée :

Code :

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

1
2
3
4
  if MaTable.fieldbyname('Fichier').asstring = 'Voir' then
     monMenu.item[0].visible := True  // represente la premiere 'option de votre menu
  else
   monMenu.item[0].visible := False;

amicalement.

[nek_kro_kvlt]

Ou alors tu pourrais faire une table contenant les intitulés des menus avec un numero de fonction et un numero d'utilisateur, après tu charges dynamiquement ton menu, tu affectes un événement click, et tu mets le numero de la fonction quelque part, soit dans une liste a part soit dans une propriété genre tag, et dans ton onClick, tu fais un case de ce numero pour appeler la bonne fonction.