示例#1
0
        public BloqueControl(TipoBloques Creacion_TipoBloque, TextoInterno Creacion_TextoEtiqueta, Point Creacion_PuntoOrigen, Size Creacion_Dims)
        {
            // definir el texto de la etiqueta de texto
            FijarTextoInterno(Creacion_TextoEtiqueta);
            this.Blq_TipoBloque             = Creacion_TipoBloque;
            this.Blq_EtiquetaInterna.Width  = Creacion_Dims.Width;
            this.Blq_EtiquetaInterna.Height = Creacion_Dims.Height;

            // posicionar y dimencionar el contenedro principal
            this.Blq_ContenedorPrincipal.Width  = Creacion_Dims.Width;
            this.Blq_ContenedorPrincipal.Height = Creacion_Dims.Height;
            Canvas.SetTop(this.Blq_ContenedorPrincipal, Creacion_PuntoOrigen.Y);
            Canvas.SetLeft(this.Blq_ContenedorPrincipal, Creacion_PuntoOrigen.X);

            // poscicionar y dimencionar la forma del
            this.Blq_FormaExterna.Height = Creacion_Dims.Height - 1;
            this.Blq_FormaExterna.Width  = Creacion_Dims.Width - 1;


            // pintar el control del color adecuado
            ColorearBloque(Creacion_TipoBloque);

            // generar la composicion de los controles
            this.Blq_ContenedorPrincipal.Children.Add(this.Blq_FormaExterna);
            this.Blq_ContenedorPrincipal.Children.Add(Blq_EtiquetaInterna);

            // suscribirse a los eventos del raton
            this.Blq_ContenedorPrincipal.MouseDown += UserControl_MouseDown;
            this.Blq_ContenedorPrincipal.MouseMove += UserControl_MouseMove;
            this.Blq_ContenedorPrincipal.MouseUp   += UserControl_MouseUp;
        }
示例#2
0
        private void FijarTextoInterno(TextoInterno TextoEntrada)
        {
            switch (TextoEntrada)
            {
            case TextoInterno.Texto_Lineal_Abajo: this.Blq_EtiquetaInterna.Content = Txt_MvArriba; break;

            case TextoInterno.Texto_Lineal_Arriba: this.Blq_EtiquetaInterna.Content = Txt_MvAbajo; break;

            case TextoInterno.Texto_Lineal_Derecha: this.Blq_EtiquetaInterna.Content = Txt_MvDrch; break;

            case TextoInterno.Texto_Lineal_Izquierda: this.Blq_EtiquetaInterna.Content = Txt_MvIzqrd; break;

            case TextoInterno.Texto_Vacio: this.Blq_EtiquetaInterna.Content = Txt_Vacio; break;
            }
        }