Umbenennen aller Menuitems und Buttons nach Action

[backdraft]

Hallo,

ich bin auf der Suche nach einem Wizard für die automatisierte Möglichkeit alle Buttons, Menuitems usw, so zu benennen, wie die zugehörige Action heißt.

Beispiel:
Action heisst: actMyAction
Button soll dann heissen: btnMyAction
Menuitem: mmMyAction

Gibt es da was?

Danke
Oliver

[KodeZwerg]

Meinst Du tatsächlich die Namen zur Laufzeit?
Da wüsste ich nicht mal ansatzweise wie das funktionieren sollte.

Wenn Du Caption meinst, da gibt es bestimmt möglichkeiten.

[backdraft]

Ich meine den Namen.
Im CnPack ist z.B. ein Wizard (Prefix Werzzeug) bei, der die Komponenten alle umbenennt mit dem richtigen Prefix.

Aus dem Namen "Action1" macht er "act1".

Es geht mir nicht darum, dass er den Code in den .pas Dateien ändert, sondern die DFM und den Namen oben in der Klassendefinition.

Es geht um die Designtime...

Der Grund ist doch recht simpel.
Ich habe eine Action, die auf einem Button liegt, einem Menüeintrag, usw.
Nennt man die Action um, sollte man ja auch die Namen der verbundenen Komponenten - wenn möglich - syncron halten, oder nicht?
Macht den Quellcode einfach übersichtlicher - finde ich.

[backdraft]

Keiner einen Tipp?

[Uwe Raabe]

Offenbar gibt es da noch nichts.

[Delphi.Narium]

Also ich mache das ganz einfach:

Es gibt nur die TActionList (bzw. einen Nachfahren, der das Weiterbeschrieben erledigt).

Menüeinträge und Buttons werden erst beim Programmstart (also zur Laufzeit) erstellt.

Der TActionList-Nachfahre hat ein Attribut von Typ TPanel, in dem im Objektinspektor das TPanel zugeordent wird, auf dem die Buttons liegen sollen.

Es gibt also ein Panel für die Buttons. Je Action ein TSpeedButton. TAction zuweisen, fertig.

Dem Application.Mainform wird ein TMainMenu spendiert. Für jede Kategorie der TActionList wird ein Menüeintrag gemacht.

Die TActions werden, entsprechend ihrer Kategorie, zu diesen Menüeinträge hinzugefügt.

Namen kann man dann vergeben, wie man will, sie sind im Programmablauf aber nicht wirklich von Bedeutung.

Vorteil: Man spart die redundate Pflege von Buttons, Menüitems, ... und vergisst auch nicht mal versehentlich was :-)

Über die Eigenschaften Enabled, Visible, Tag, GroupIndex, ... kann man ggfls. auch steuern, ob Button bzw. Menüeintrag überhaupt erstellt werden sollen.

Bei mir heißt
GroupIndex = 0: Menüeintrag und Button
GroupIndex = -1: Menüeintrag
GroupIndex = -2: Button
GroupIndex = -3: weder Button noch Menüeintrag

Achso: Funktioniert auch mit mehreren TActionList, sogar, wenn sie auf unterschiedlichen Formularen oder in 'nem, Datamodule, ... liegen, die Menüeinträge befinden sich alle im Hauptmenü des Programmes.