Menü speichern

[Markus Sommer]

Hallo,

In meinem Programm sind sollen Menüs benutzerabhänig sein. Die Benutzer sind als Datesätze in einer Datenbank gespeichert. Kennt jemand eine Möglichkeit das Erscheinungsbild eines Menüs in einem Datensatz zu speichern? Oder wie organisiert Ihr Eure Benutzerabhänigen Menüs?

[shadows]

In einem Solchen fall würde ich die einträge Dynamisch erzeugen.

List ist vom Typ TList und entweder Global, oder in der Form definiert, je nach dem, wie man es braucht, meistens in der Form.

<pre>
procedure ...
var
mItem: TMenuItem;
i: integer;
s: string;

begin
for i:=0 to MenuitemList.count-1 do
begin
s:=ReadNextCaptionFromDatabase;
mItem:=TMenuItem.Create(MainMenu1);
mItem.Caption:=s;
mItem.OnClick:=MenuItemOnCLick;
...
List.add(mItem);
end;

end;
</pre>

Die Liste Brauchst du, damit du die Objekte beim Programmende oder User wechsel wieder zerstöhren kannst. Du mußt dir dann halt noch was einfallen lassen, wie du koordiniert, welche Caption, welche funktion hat. Am besten in die datenbank ein integer schreiben und die zuweisung der Procedure auf den onClick event mit "case" machen.
Dies ist natürlich nur eine Demonstration, über die art der Vorgehensweise.

Das ist auch im Bezug zu Crackern viel besser, als alles anzulegen nur die Einträge mit ".Visible:=false;" zu verändern