Discussion :

[ChPr]

Bonjour à toutes et à tous,

Je dois être bien bête, mais je n'arrive pas à avoir accès par programmation à la propriété "Enabled" d'une action d'un TActionList, bien que cette propriété figure dans l'inspecteur d'objets et que si on la coche ou décoche dans l'inspecteur cela agit.

Que j'écrive :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  i:= MaListeActions.IndexOfName('MonAction');
  MaListeActions.Actions[i].  // pas de propriété "Enable"

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MaListeActions.ActionByName('MonAction').  // pas de propriété "Enable"

Je n'ai pas de propriété "Enabled". Comment fait-on pour y accéder ?

Cordialement.

Pierre

[ChPr]

Bon, j'ai trouvé la solution.

Les actions étant des enfants de ActionList, je voulais passer par "MaListeActions" pour atteindre les enfants.

Il suffit en fait d'accéder directement aux actions elles-mêmes, soit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonAction.Enabled:= True ou False ...

Voilà, voilà, c'était bien bête

Cordialement.

Pierre.

[ChPr]

... Les actions étant des enfants de ActionList, ...

Mis à part que ma solution fonctionne, TAction n'est pas un descendant de TActionList, n'en est même pas une propriété. La propriété de TActionList qui pourrait y faire lien est la propriété "Actions", mais elle ne fait référence qu'à un ancêtre "TContainedAction" de TAction.

Cordialement.

Pierre.

[BeanzMaster]

Salut Pierre,

Les TAction / TActionList, ne fonctionnent pas comme une liste normale.

Le plus "vieux" parent de TAction est TComponent.

Si tu veux acceder aux Actions via l'ActionList tu doit transtyper

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TAction(ActionList.Actions[0].ActionList.ActionByName('Test')).Enabled := true;

ou ActionList.Actions[0] correspond aux catégories de l'ActionList

A+

Jérôme

[ChPr]

... Si tu veux acceder aux Actions via l'ActionList tu doit transtyper ...

Salut Jérome, j'avais essayé de transtyper, mais je n'étais pas remonté assez loin.

Bon, par ailleurs, c'est plus simple d'y avoir accès directement.

Cordialement.

Pierre