Taction.checked

[akaye...@yahoo.co.uk]

I'm trying to create a window menu on a Tactionmainmenubar, I can
populate the menu ok except the action.checked and groupindex
properties don't seem to work.

Checked just plain doesn;t work and if the groupindex property is set
to anything other than zero, an AV error happens when the checked
property is set.

Everything else seems to work, I can make the visible and enabled
properties function as expected.

Is this a bug in Taction?

[akaye...@yahoo.co.uk]

I managed to trace this problem myself by turning on debug DCU's for
the compiler and tracing into the runtime actions.

Turns out, the bug is in the ActionManager code.

Apparently there is an unpublished property called "Actionlist" which
is in TcontainedAction from which Taction is derived.

This property should be set to the ActionManager it is added to so
that the action can be linked with the other actions in the list in
order to check the grouping of items that need to be unchecked when
the selected action is checked.

As a work around every item that is added to the action manager at
runtime should have another line setting the Actionlist property.

eg,

d:=ActionManager1.AddAction(Item,d);
Item.ActionList:=ActionManager1;