Esempio n. 1
0
 public override void btNuevo_Click(object sender, EventArgs e)
 {
     if (matriz != null)
     {
         foreach (TextBox t in matriz)
         {
             t.Dispose();
         }
     }
     if (adjunta != null)
     {
         foreach (Label l in adjunta)
         {
             l.Dispose();
         }
     }
     defecto = false;
     btDefecto.Show();
     EtiquetaFilas.Show();
     tbFilas.ResetText();
     tbFilas.Show();
     lbExplicacion.Show();
     lbExplicacion.Text = "Introducir números enteros. \n\n( Pulsar el botón 'E' para resolución de ejemplo con valores por defecto. )";
     btContinuar.Hide();
     label1.Hide();
     label2.Hide();
     tbFilas.Focus();
 }
Esempio n. 2
0
 public override void Cargar(object sender, EventArgs e)
 {
     this.MinimumSize = new Size(1300, 700);
     this.Text        = "Determinante de una matriz cuadrada.";
     lbExplicacion.Show();
     lbExplicacion.Text = "Introducir un número entero.\n\n(Pulsar el botón [E] para ejemplo con valores por defecto.)";
     EtiquetaFilas.Show();
     EtiquetaFilas.AutoSize = true;
     EtiquetaFilas.Location = new Point(EtiquetaFilas.Location.X, lbExplicacion.Location.Y + 120);
     EtiquetaFilas.Text     = "Cantidad de filas y columnas de la matriz: ";
     tbFilas.Show();
     tbFilas.Location   = new Point(EtiquetaFilas.Location.X + EtiquetaFilas.Size.Width + 10, EtiquetaFilas.Location.Y);
     tbFilas.TextAlign  = HorizontalAlignment.Center;
     btDefecto.Location = new Point(tbFilas.Location.X + tbFilas.Size.Width + 5, EtiquetaFilas.Location.Y);
     tbFilas.Focus();
     tbFilas.KeyPress      += tbOrden_KeyPress;
     btDefecto.Click       += btDefecto_Click;
     btContinuar.Click     += btContinuar_Click;
     btNuevo.Click         += btNuevo_Click;
     radioButton1.Click    += rbSeleccion_Click;
     radioButton2.Click    += rbSeleccion_Click;
     radioButton3.Click    += rbSeleccion_Click;
     Temporizador1.Tick    += Temporizador1_Tick;
     Temporizador1.Interval = 1000;
 }
Esempio n. 3
0
 public override void Cargar(object sender, EventArgs e)
 {
     this.Text = "Multiplicación y división de polinomios";
     lbExplicacion.Show();
     lbExplicacion.Text = "Introduzca el primer polinomio:";
     if (!directa)
     {
         lbExplicacion.Text += "\n\nO pulse el botón [E] para resolución de ejemplo con valores por omisión.";
     }
     EtiquetaFilas.Show();
     EtiquetaFilas.Location = new Point(20, lbExplicacion.Height + 20);
     EtiquetaFilas.Text     = "Primer polinomio:";
     EtiquetaFilas.AutoSize = true;
     tbFilas.Show();
     tbFilas.Location  = new Point(EtiquetaFilas.Location.X + EtiquetaFilas.Width + 10, EtiquetaFilas.Location.Y);
     tbFilas.Size      = new Size(600, tbFilas.Height);
     tbFilas.KeyPress += Cajas_KeyPress;
     tbFilas.Focus();
     if (directa)
     {
         btDefecto.Hide();
     }
     btDefecto.Location = new Point(tbFilas.Location.X + tbFilas.Width + 10, tbFilas.Location.Y);
     timer1             = new Timer();
     timer1.Interval    = 1500;
     timer1.Tick       += timer1_Tick;
 }
Esempio n. 4
0
 public override void Cargar(object sender, EventArgs e)
 {
     this.MinimumSize = new Size(1300, 700);
     this.Text        = "Matriz adjunta de una matriz cuadrada.";
     EtiquetaFilas.Show();
     tbFilas.Show();
     EtiquetaFilas.Text = "Cantidad de filas y columnas de la matriz:";
     btSalir.Click     += btSalir_Click;
     tbFilas.KeyPress  += tbFilas_KeyPress;
     lbExplicacion.Show();
     lbExplicacion.Text     = "Introducir números enteros. \n\n( Pulsar el botón 'E' para resolución de ejemplo con valores por defecto. )";
     btContinuar.Click     += ResolucionPasoAPaso;
     lbExplicacion.Size     = new Size(lbExplicacion.Size.Width - 15, lbExplicacion.Size.Height);
     btDefecto.Click       += btDefecto_Click;
     btNuevo.Click         += btNuevo_Click;
     EtiquetaFilas.Location = new Point(EtiquetaFilas.Location.X, lbExplicacion.Height + 5);
     tbFilas.Location       = new Point(tbFilas.Location.X, EtiquetaFilas.Location.Y);
     btDefecto.Location     = new Point(btDefecto.Location.X, tbFilas.Location.Y);
 }
Esempio n. 5
0
 public override void Cargar(object sender, EventArgs e)
 {
     if (directa)
     {
         btDefecto.Hide();
     }
     this.Text = "Convertir decimales en racional";
     lbExplicacion.Show();
     if (!directa)
     {
         lbExplicacion.Text = "Introducir un número decimal.\n\n O pulse el botón [E] para ejemplo con valores por defecto. ";
     }
     else
     {
         lbExplicacion.Text = "Introducir un número decimal.";
     }
     EtiquetaFilas.Show();
     EtiquetaFilas.Text     = "Decimal:";
     EtiquetaFilas.Location = new Point(100, 100);
     EtiquetaFilas.AutoSize = true;
     tbFilas.Show();
     tbFilas.Location = new Point(EtiquetaFilas.Location.X + EtiquetaFilas.Width + 5, EtiquetaFilas.Location.Y);
     tbFilas.Size     = new Size(105, EtiquetaFilas.Height);
     tbFilas.Focus();
     tbFilas.KeyPress += tbFilas_KeyPress;
     if (directa)
     {
         btDefecto.Hide();
     }
     btDefecto.Location   = new Point(tbFilas.Location.X + tbFilas.Width + 5, tbFilas.Location.Y);
     btContinuar.Click   += btContinuar_Click;
     btContinuar.Location = new Point(EtiquetaFilas.Location.X, EtiquetaFilas.Location.Y + 50);
     label1.Location      = new Point(btContinuar.Location.X, btContinuar.Location.Y + btContinuar.Height + 5);
     label1.BackColor     = Color.Transparent;
     label1.AutoSize      = true;
     label1.TextAlign     = ContentAlignment.MiddleLeft;
     label2.BackColor     = Color.Chartreuse;
     label2.AutoSize      = true;
     label2.TextAlign     = ContentAlignment.MiddleLeft;
 }
Esempio n. 6
0
        public override void Cargar(object sender, EventArgs e)
        {
            if (directa)
            {
                btDefecto.Hide();
            }

            this.Text = "Módulo y argumento de números complejos";

            lbExplicacion.Show();
            lbExplicacion.Text = "Introduzca la parte real e imaginaria del número complejo.\n\nO pulse el botón [E] para ejemplo con valores por defecto.";

            grafica = new Espacio2D(750, 600, new Point(10, lbExplicacion.Height + 15));
            Controls.Add(grafica.Ventana);
            grafica.Ventana.Hide();

            EtiquetaFilas.Show();
            EtiquetaFilas.Text     = "Parte real:";
            EtiquetaFilas.Location = new Point(grafica.Ventana.Location.X + grafica.Ventana.Width + 5, grafica.Ventana.Location.Y);
            EtiquetaFilas.AutoSize = true;

            EtiquetaColumnas.Show();
            EtiquetaColumnas.Location = new Point(EtiquetaFilas.Location.X, EtiquetaFilas.Location.Y + EtiquetaFilas.Height + 5);
            EtiquetaColumnas.Text     = "Parte imaginaria:";
            EtiquetaColumnas.AutoSize = true;

            tbcolumnas.Show();
            tbcolumnas.Location  = new Point(EtiquetaColumnas.Location.X + EtiquetaColumnas.Width + 5, EtiquetaColumnas.Location.Y);
            tbcolumnas.KeyPress += Cajas_KeyPress;

            tbFilas.Show();
            tbFilas.Location  = new Point(tbcolumnas.Location.X, EtiquetaFilas.Location.Y);
            tbFilas.KeyPress += Cajas_KeyPress;

            btDefecto.Location = new Point(tbFilas.Location.X + tbFilas.Width + 10, tbFilas.Location.Y - 2);
        }
Esempio n. 7
0
 private void btContinuar_Click(object sender, EventArgs e)
 {
     if (paso == 0)
     {
         indicesrojos = new List <int>();
         if (!directa)
         {
             lbExplicacion.Text = "El número imaginario unidad es √-1 y se indica como 'i'. Un número imaginario de coeficiente distinto a la unidad, se indica 'ci' donde c es un número real que es el coeficiente. Tambien se puede expresar en combinación con un número real con la forma: a + ci , donde 'a' y 'c' son números reales, en estos casos se denominan: numeros complejos.\nEl cuadrado del imaginario unidad, es -1.";
         }
         else if (directa)
         {
             lbExplicacion.Text += "\nEl número imaginario unidad es √-1 y se indica como 'i'. Un número imaginario de coeficiente distinto a la unidad, se indica 'ci' donde c es un número real que es el coeficiente. Tambien se puede expresar en combinación con un número real con la forma: a + ci , donde 'a' y 'c' son números reales, en estos casos se denominan: numeros complejos.\nEl cuadrado del imaginario unidad, es -1.";
         }
         rtbExplicaciones.Text = "i: Número imaginario unidad igual a la raiz de -1 ";
         indicesrojos.Add(0);
         indicesrojos.Add(1);
         indicesrojos.Add(rtbExplicaciones.Text.Length);
         rtbExplicaciones.Text += "\n\n2i:  √(-4) = √(4 * -1) = 2√(-1) = 2i Imaginario puro";
         indicesrojos.Add(4);
         indicesrojos.Add(rtbExplicaciones.Text.Length);
         rtbExplicaciones.Text += "\n\n15+2i: Combinacion de un número real (15) más un imaginario (2i). Número complejo.";
         indicesrojos.Add(7);
         indicesrojos.Add(rtbExplicaciones.Text.Length);
         rtbExplicaciones.Text += "\n\ni^2 = -1";
         indicesrojos.Add(5);
         for (int i = 0; i < indicesrojos.Count; i += 2)
         {
             rtbExplicaciones.Select(indicesrojos[i], indicesrojos[i + 1]);
             rtbExplicaciones.SelectionColor = Color.Red;
             rtbExplicaciones.SelectionFont  = new Font("Dejavu Sans", 14, FontStyle.Bold);
         }
         paso++;
     }
     else if (paso == 1)
     {
         if (!directa)
         {
             lbExplicacion.Text = "Un número complejo se puede representar gráficamente, considerando la parte real como el valor de las abcisas ( eje X ), y el coeficiente imaginario como valor de las ordenadas ( eje Y ).\nEn el ejemplo, se puede ver la representación gráfica del complejo: 5 + 9i ";
         }
         else if (directa)
         {
             lbExplicacion.Text += "\nUn número complejo se puede representar gráficamente, considerando la parte real como el valor de las abcisas ( eje X ), y el coeficiente imaginario como valor de las ordenadas ( eje Y ).\nEn el ejemplo, se puede ver la representación gráfica del complejo: 5 + 9i ";
         }
         EtiquetaFilas.Show();
         EtiquetaFilas.Location = new Point(btContinuar.Location.X, btContinuar.Location.Y + btContinuar.Height + 5);
         EtiquetaFilas.Text     = "Parte real:";
         EtiquetaFilas.AutoSize = true;
         tbFilas.Show();
         tbFilas.Location  = new Point(EtiquetaFilas.Location.X, EtiquetaFilas.Location.Y + EtiquetaFilas.Height + 5);
         tbFilas.Width     = EtiquetaFilas.Width;
         tbFilas.Text      = "5";
         tbFilas.KeyPress += Cajas_KeyPress;
         tbFilas.TextAlign = HorizontalAlignment.Center;
         label2.Show();
         label2.BackColor = Color.Transparent;
         label2.Location  = new Point(tbFilas.Location.X + tbFilas.Width + 5, tbFilas.Location.Y);
         label2.Font      = EtiquetaFilas.Font;
         label2.Text      = "+";
         label2.Width     = 3;
         label2.TextAlign = ContentAlignment.MiddleCenter;
         EtiquetaColumnas.Show();
         EtiquetaColumnas.Location = new Point(label2.Location.X + label2.Width + 5, EtiquetaFilas.Location.Y);
         EtiquetaColumnas.Text     = "Parte imaginaria";
         EtiquetaColumnas.AutoSize = true;
         tbcolumnas.Show();
         tbcolumnas.Location  = new Point(EtiquetaColumnas.Location.X, tbFilas.Location.Y);
         tbcolumnas.Width     = EtiquetaColumnas.Width;
         tbcolumnas.Text      = "9";
         tbcolumnas.TextAlign = HorizontalAlignment.Center;
         tbcolumnas.KeyPress += Cajas_KeyPress;
         imaginario           = new Imaginario(5, 9);
         label1.Show();
         label1.BackColor = Color.Transparent;
         label1.Font      = EtiquetaFilas.Font;
         label1.Location  = new Point(tbcolumnas.Location.X + tbcolumnas.Width + 5, tbcolumnas.Location.Y);
         label1.Text      = "i";
         if (!directa)
         {
             grafica = new Espacio2D(750, 600, new Point(10, lbExplicacion.Height + 5));
         }
         else if (directa)
         {
             grafica = new Espacio2D(750, 600, new Point(10, lbExplicacion.Height + 10));
         }
         Controls.Add(grafica.Ventana);
         pnZoom.Show();
         pnZoom.Location = new Point(tbFilas.Location.X, tbFilas.Location.Y + tbFilas.Height + 5);
         btAbajo.Show();
         btAbajo.Click += MoverAbajo;
         btArriba.Show();
         btArriba.Click += MoverArriba;
         btDerecha.Show();
         btDerecha.Click += MoverDerecha;
         btIzquierda.Show();
         btIzquierda.Click += MoverIzquierda;
         btCentrar.Show();
         btCentrar.Click += Centrar;
         btZoomMas.Show();
         btZoomMas.Click += ZoomMas;
         btZoomMenos.Show();
         btZoomMenos.Click += ZoomMenos;
         lbDesplazamiento.Show();
         lbZoomtitulo.Show();
         radioButton1.Show();
         radioButton1.Location = new Point(rtbExplicaciones.Location.X, rtbExplicaciones.Location.Y - 30);
         radioButton2.Show();
         radioButton2.Text     = "Escala Decimal.";
         radioButton1.Text     = "Escala Racional";
         radioButton2.Location = new Point(radioButton1.Location.X + radioButton1.Width + 5, radioButton1.Location.Y);
         if (!directa)
         {
             grafica.PintarLinea(new Punto(new Racional[] { new Racional(0, 1), new Racional(0, 1) }), new Punto(new Racional[] { imaginario.ParteReal, imaginario.ParteImaginaria }), Color.Red, 3, true);
         }
         paso++;
     }
     else if (!directa && paso == 2)
     {
         lbExplicacion.Text = "Introduzca los valores de cualquier imaginario, con coeficientes enteros o racionales, para ver su representacion grafica.";
         tbFilas.Focus();
         tbFilas.SelectAll();
         grafica.PintarLinea(new Punto(new Racional[] { new Racional(0, 1), new Racional(0, 1) }), new Punto(new Racional[] { imaginario.ParteReal, imaginario.ParteImaginaria }), Color.Red, 3, true);
         grafica.Ventana.Invalidate();
         btContinuar.BackColor = Color.SeaGreen;
         btContinuar.Text      = "";
         btContinuar.Size      = new Size(0, 0);
     }
     else if (directa && paso >= 2)
     {
         if (paso > 2)
         {
             grafica.PintarLinea(new Punto(new Racional[] { new Racional(0, 1), new Racional(0, 1) }), new Punto(new Racional[] { imaginario.ParteReal, imaginario.ParteImaginaria }), Color.Red, 3, true);
             grafica.Ventana.Invalidate();
         }
         else if (paso == 2)
         {
             lbExplicacion.Text += "\nIntroduzca los valores de cualquier imaginario, con coeficientes enteros o racionales, para ver su representacion grafica.";
         }
         tbFilas.ResetText();
         tbcolumnas.ResetText();
         label2.Text = "";
         tbFilas.Focus();
         paso++;
     }
 }
Esempio n. 8
0
        /// <summary>
        ///
        /// REINICIA UN NUEVO FORMULARIO
        ///
        /// </summary>

        public override void btNuevo_Click(object sender, EventArgs e)
        {
            this.Text = "Deteminante de una matriz cuadrada.";
            radioButton1.Hide();
            radioButton2.Hide();
            radioButton3.Hide();
            diagonales = false;
            menores    = false;
            gauss      = false;
            if (copiamatriz != null)
            {
                foreach (TextBox t in copiamatriz)
                {
                    t.Dispose();
                }
            }
            label1.Hide();
            label2.Hide();
            label3.Hide();
            label4.Hide();
            label6.Hide();
            label7.Hide();
            label5.Hide();
            lbExplicacion.Show();
            lbExplicacion.Text = "Introducir un número entero.\n\n(Pulsar el botón [E] para ejemplo con valores por defecto.)";
            btDefecto.Location = new Point(tbFilas.Location.X + tbFilas.Size.Width + 5, EtiquetaFilas.Location.Y);
            if (directa)
            {
                EtiquetaFilas.Text = "Cantidad de filas y columnas de la matriz: ";
                tbFilas.BackColor  = Color.White;
            }
            producto             = new Racional(1, 1);
            productos            = new List <Racional>();
            productosizquierda   = new List <Racional>();
            radioButton1.Checked = false;
            radioButton2.Checked = false;
            radioButton3.Checked = false;
            EtiquetaFilas.Show();
            tbFilas.Show();
            btDefecto.Show();
            orden = 0;
            paso  = 0;
            paso  = 0;
            btContinuar.Hide();
            label3.Text = "Total derecha: ";
            label4.Text = "Total izquierda: ";
            tbFilas.ResetText();
            tbFilas.Focus();
            tbFilas.Size = new Size(60, 26);
            if (matriz != null)
            {
                foreach (TextBox t in matriz)
                {
                    t.Dispose();
                }
            }
            filaactual        = 0;
            columnaactual     = 0;
            columnaaconvertir = 0;
            filaarestar       = 1;
        }