Oh ja, die Benutzrechte sind ja sooo schwer da mit reinzubringen:
Delphi-Quellcode:
TAction(Sender).Enabled :=
CurrentUser.HasRight( 'Foo' ) and
not FooRunning;
und auch noch total unübersichtlich ...
Mit den Flags meine ich
nicht die Eigenschaften der Actions, sondern ob irgendetwas aktiv gerade läuft. Die Eigenschaften der Actions setzt man dann im
OnUpdate
und zwar abhängig von diesen Flags.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)