Este ejemplo explica cómo se cambia el icono del botón de notas y el color de letra del encabezado del cliente cuando tiene notas asociadas.
Código VB6:
Sub Show()
if gForm.Controls("EObjeto").ObjGlobal.TieneNotas then
gForm.Controls("EComerciales").Forecolor = vbred
gForm.Controls("EObjeto").Forecolor = vbred
gForm.Controls("EEConomicos").Forecolor =vbred
gform.Botonera.Boton("botNotas").IdIcono = 450 ' icono de pelota verde
End if
End SubCódigo C#:
using AhoraCl;
using AhoraOCX;
using System.Drawing;
namespace AhoraScriptsPantalla
{
public class AhoraCl_frmClientes : AhoraOCX.AhoraBaseScript
{
public void Show()
{
ICliente cliente = (( (gForm.Controls["EObjeto"] as IEnlaceObjetos).ObjGlobal) as ICliente);
if (cliente.TieneNotas())
{
(gForm.Controls["EComerciales"] as IEnlaceObjetos).ForeColor = Color.Red;
(gForm.Controls["EObjeto"] as IEnlaceObjetos).ForeColor = Color.Red;
(gForm.Controls["EEConomicos"] as IEnlaceObjetos).ForeColor = Color.Red;
(gForm.Controls["Botonera"] as ICntBotonera).Boton("botNotas").IdIcono = 450; // icono de pelota verde
}
}
}
}Solo en Ahora 5:
Por defecto los iconos agregados en la Botonera respetarán los colores establecidos en el skin seleccionado (en caso de tenerlos). Únicamente disponible para los iconos de sistema formato svg.
Existe una propiedad para omitir estos colores por defecto y que se respete el color original del icono, la propiedad ForzarColorIcono.
Por defecto está desactivada y al activarse mostrará el color original del icono.
En el siguiente ejemplo vemos como para el mismo Id de icono nos muestra uno con el color corporativo estándar y el otro con el color original.
Código C#:
ICntBotonera Botonera = (ICntBotonera)gForm.Controls["Botonera"];
Botonera.BotonAdd("Icono Sin Color", "btnIconoSinColor", "", ETipo_Menu.eTipo_Menu_Boton, false, 449);
Botonera.BotonAdd("Icono Con Color", "btnIconoConColor", "", ETipo_Menu.eTipo_Menu_Boton, false, 449).ForzarColorIcono = true;El resultado es el siguiente:
