Ejemplo de creación de un control CntBotonOpcion por código. Pulsando el botón "Mostrar Valor" se ven los valores de los cntBotonOpcion generados.
Es importante tener en cuenta que los controles CntBotonOpcion se agrupan por contendor, por lo que todos aquellos controles agrupados en el mismo panel pueden mantener únicamente uno de los registros a Value = true.
Código C#:
using AhoraCore;
using AhoraOCX;
using AhoraSistema;
using static AhoraCore.VBA.Interaction;
using static AhoraCore.VbMsgBoxResult;
using static AhoraCore.VbMsgBoxStyle;
using System;
namespace AhoraScriptsPantalla
{
public class AhoraScripts_nombre_Form : AhoraOCX.AhoraBaseScript
{
public override void Show()
{
try
{
ICntPanel panel = (gForm.Controls["panMain"] as ICntPanel);
ICntBotonOpcion cntBotonOpcion1 = null;
cntBotonOpcion1 = (ICntBotonOpcion)gForm.Controls.Add("AhoraOCX.CntBotonOpcion", "cntBotonOpcion1", panel);
cntBotonOpcion1.Caption = "Opción 1";
cntBotonOpcion1.Top = 100;
cntBotonOpcion1.Left = 100;
ICntBotonOpcion cntBotonOpcion2 = null;
cntBotonOpcion2 = (ICntBotonOpcion)gForm.Controls.Add("AhoraOCX.CntBotonOpcion", "cntBotonOpcion2", panel);
cntBotonOpcion2.Caption = "Opción 2";
cntBotonOpcion2.Top = 200;
cntBotonOpcion2.Left = 100;
ICntBoton cntBoton = null;
cntBoton = (ICntBoton)gForm.Controls.Add("AhoraOCX.CntBoton", "cntBoton", panel);
cntBoton.Caption = "Mostrar Valor";
cntBoton.Top = 400;
cntBoton.Left = 100;
cntBoton.Click += CntBoton_Click;
}
catch (Exception ex)
{
gCn.Tr.Trace(TracerOrigen.TError, this.GetType().Name, nameof(Show), 0, ex.Message);
}
}
private void CntBoton_Click(object sender, EventArgs e)
{
ICntBotonOpcion cntBotonOpcion1 = (gForm.Controls["cntBotonOpcion1"] as ICntBotonOpcion);
ICntBotonOpcion cntBotonOpcion2 = (gForm.Controls["cntBotonOpcion2"] as ICntBotonOpcion);
MsgBox($"valor opcion1:{cntBotonOpcion1.Value} valor opcion2:{cntBotonOpcion2.Value} ");
}
}
}
¿Le ha sido útil este artículo?
¡Qué bien!
Gracias por sus comentarios
¡Sentimos mucho no haber sido de ayuda!
Gracias por sus comentarios
Sus comentarios se han enviado
Agradecemos su esfuerzo e intentaremos corregir el artículo