Registriert seit: 19. Aug 2004
Ort: Hof/Saale
1.746 Beiträge
Delphi 2007 Professional
|
AW: Toolbar -> Toolbutton -> Action
26. Feb 2013, 11:56
Ich glaube, du kannst das immer noch einfacher machen.
Die Zeile
MeinToolButton := TToolButton(FM_Main.FindComponent(FM_Main.Components[I].Name));
kannst AFAICT so schreiben:
MeinToolButton := TToolButton(FM_Main.Components[I]);
Dann dürfte auch die darauf folgende Prüfung auf nil hinfällig sein.
Uli Gerhardt
|