Casimiro Notevi me ha dado la solución, que es bien sencilla.
Solamente tenía que añadir
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;