Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.300 Beiträge
 
Delphi 12 Athens
 
#4

AW: Rechte-Verwaltung in einem Delphi-Project

  Alt 29. Mär 2022, 07:40
Hallöle...
Zitat:
"SecuritySystem" von TMS ausprobiert
...da standen die Paßworter im Klartext in der DB Tabelle.

Zitat:
und dann Rechte auf z.B. verschiedene Buttons/Menüs/etc. zuweisen (das ist der komplexere Teil)
...imho darf das Rechtesystem nicht wissen welchen "Button/Menüpunkt" es steuern soll.

Trennung GUI/Logic...Das Recht für "FunktionX" hat einen z.B. eindeutigen Wert (Integer etc.). In der Businesslogic wird das Recht dem
entsprechenden "Button" zugeordnet.
Delphi-Quellcode:
lagHistory.Visible := IsRightAllowed(25025) and (UpperCase(FLogic.CurrentStoreName) = 'Blubb');
...
Zum Thema:
* 3 Tabellen...User, UserRole, UserRights. Der User hat eine Rolle. Die Rolle kennt ihre Rechte.
* mit der Anmeldung bekommt der User seine Rechte
* eigene function IsRightAllowed(RightID: Integer): Boolean; wenn benötigt auswerten
* eigene Userverwaltung schreiben (Rollen/Rechte)

Problem:
Kommen Rechte hinzu oder werden gelöscht, was bei einem dynamischen System normal ist, muß das neue Recht bei allen bestehen Rollen "angehängt/gelöscht" werden. Dafür muß eine Logic entstehen...

OpenSource:
Keine OpenSource Lösung kommt an deine Anforderungen heran. Es ist immer was nicht richtig...dann gleich selbst.
Miniaturansicht angehängter Grafiken
rechte.png  
Angehängte Dateien
Dateityp: txt UserRightsNewUser.txt (453 Bytes, 22x aufgerufen)

Geändert von haentschman (29. Mär 2022 um 07:56 Uhr)
  Mit Zitat antworten Zitat