Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 17-08-2012
jars jars is offline
Miembro
 
Registrado: mar 2004
Posts: 279
Poder: 21
jars Va por buen camino
ActionList y cambio de imagen

Hola amigos.
Tengo el siguiente problema:
En un boton asociado a una accion de un actionList, quiero alternar la imagen del mismo. al darle click cambia la imagen y al volver a darle click vuelve a la anterior y asi...
El problema es que le cambio el ImageIndex y siempre me mantiene el mismo.
Le pongo:
Código:
procedure TMainForm.ActionDNDExecute(Sender: TObject);
//-----------------------------------------------------------------------------
begin
  if ActionDND.Tag = 0 then
  begin
    ActionDND.ImageIndex := 11;
    ActionDND.Tag = 1;
    ..... codigo
  end else
  begin
    ActionDND.ImageIndex := 10;
    ActionDND.Tag = 0;
    ..... codigo
  end;
end;
Alguien sabe como hacer que se actualize la imagen?
Gracias
Responder Con Cita
  #2  
Antiguo 17-08-2012
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Supongo que eso se debe a que el botón guarda su propia imagen en lugar de usar directamente la del imagelist asociado a la acción. La única manera que he visto para que actualice la imagen es:

1. Borrar la imagen del botón
2. Borra la acción del botón
3. Volver a asignar la acción.

O sea, algo como:

Código Delphi [-]
TAction(Action).imageindex := 1;
Bitbtn1.Glyph := nil;
Bitbtn1.Action := nil;
Bitbtn1.Action := Action;

// Saludos
Responder Con Cita
  #3  
Antiguo 17-08-2012
jars jars is offline
Miembro
 
Registrado: mar 2004
Posts: 279
Poder: 21
jars Va por buen camino
Gracias Roman.
Probe lo que propones y la primera vez cambia pero despues no cambia mas.
Responder Con Cita
  #4  
Antiguo 17-08-2012
jars jars is offline
Miembro
 
Registrado: mar 2004
Posts: 279
Poder: 21
jars Va por buen camino
Roman, volvi a probar y funciona.
No lo habia hecho en la misma secuencia que sugeriste.
Muchas gracias.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Actionlist y DB Luis Castillo Varios 2 28-10-2005 21:08:33
ActionList pablo Varios 6 31-05-2005 16:32:07
ActionList y Shortcuts roman OOP 1 31-08-2004 21:28:17
Utilizando un Actionlist Carlos Arevalo OOP 5 13-09-2003 22:14:56


La franja horaria es GMT +2. Ahora son las 15:16:56.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi