Ver Mensaje Individual
  #2  
Antiguo 06-06-2006
Avatar de papulo
papulo papulo is offline
Miembro
 
Registrado: ago 2005
Ubicación: Lleida - Cataluña - España -Europa - Planeta tierra - Sistema solar - Via Lactea ...
Posts: 542
Reputación: 19
papulo Va por buen camino
Solucion

Casimiro Notevi me ha dado la solución, que es bien sencilla.

Solamente tenía que añadir

Código Delphi [-]
  bbMA.Glyph := nil;
Antes de cargar la nueva imagen en el boton.

El código queda así:
Código Delphi [-]
procedure TGraphForm.bbALClick(Sender: TObject);
begin
  bbMA.Glyph := nil;
    if bAL then
       begin
        DataModule.imageResources.GetBitmap(4, bbAL.Glyph);
        bAL := False
      end
    else
      begin
        DataModule.imageResources.GetBitmap(0, bbAL.Glyph);
        bAL := True
      end
  end;
__________________
"El aprendizaje potencia la intuición"
Yo mismo, en un momento de inspiración. v2.0
Responder Con Cita