Ja, Du hast recht.
Hatte mich da verzettelt.
Wollte die Toolbutton per ComponentCount durchsuchen und das klappte am Anfang einfach nicht. Nun habe ich es:
Delphi-Quellcode:
For I := 0 to FM_Main.ComponentCount - 1 do
begin
if FM_Main.Components[I] is TToolButton then
begin
MeinToolButton := TToolButton(FM_Main.FindComponent(FM_Main.Components[I].Name));
If MeinToolButton <> nil then
begin
If MeinToolButton.Action <> nil then
begin
Name := MeinToolButton.Action.Name;
...
Gruss
Holger