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 Sub
Có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: