Ver Mensaje Individual
  #1  
Antiguo 14-02-2014
Avatar de Jere_84
Jere_84 Jere_84 is offline
Miembro
NULL
 
Registrado: sep 2011
Ubicación: Córdoba, Argentina
Posts: 214
Reputación: 0
Jere_84 cantidad desconocida en este momento
Necesito Deshabilitar acciones en TActionManager

Buenas tardes!, Estoy utilizando la cinta de opciones TRibbon que se utiliza conjuntamente con el componente TActionManager este ultimo tiene todas las acciones que están en la cinta TRibbon. Lo que necesito hacer es para ciertos usuarios deshabilitar algunas acciones del TActionManager.

Logre ocultarlas:
Código Delphi [-]
for i := 0 to ActionManager1.ActionBars.Count -1 do
    for j := 0 to ActionManager1.ActionBars[i].Items.Count -1  do
      if ActionManager1.ActionBars[i].Items[j].tag = 0 then
        ActionManager1.ActionBars[i].Items[j].Visible := False;

Pero necesito deshabilitarlas, algo así debería ser pero no funciona:
Código Delphi [-]
for i := 0 to ActionManager1.ActionCount - 1 do
       if ActionManager1.Actions[i] is TAction then
         (ActionManager1.Actions[i] as TAction).Enabled := False;

En el TActionManager al ver la lista de acciones esta la propiedad Enabled pero esto en diseño, en ejecución no puedo encontrar el camino a esta propiedad.

Bueno si alguien me puede ayudar será bienvenido!

Saludos cordiales.
Responder Con Cita