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();
}
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;
}
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;
}
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);
}
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;
}
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);
}
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++;
}
}
/// <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;
}