Programa de Matematicas

[Neftali [Germán.Estévez]]

Empezado por Caral

Lo hice para que mi hija aprendiera practicando las tablas de multiplicar en forma de juego.

Eso me parece una gran idea.

Empezado por Caral

...Me encantaria que lo vierais y criticarais a un aprendiz, ademas de enviar las modificaciones, parciales o totales que querais.

Lo primero que me ha llamado la atención del programa es que hay bastante código que es repetitivo; Si le echas un vistazo a la función FindComponent, verás que te puede ayudar a reducir código en estas funciones; También creo que te puede ayudar a aclararte en general el llamar a determinados componentes/botones/combos/edits con un nombre más descriptivo que el que pone delphi por defecto.

Por ejemplo, este código:

Código Delphi [-]
  ComboBox5.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox7.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox9.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox11.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox13.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox15.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox17.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox19.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox21.Text:= FloatToStr(RandomRange(1, 10));
  ComboBox23.Text:= FloatToStr(RandomRange(1, 10));

Se ppuede sustituir por este:

Código Delphi [-]
var
  i, j:Integer;
  comp:TComponent;
...

  // recorrer los combos
  for i := 1 to 10 do begin
    j := (i * 2) + 3; // con i desde 1 hasta 10 te dará la secuencia: 5,7,9,11
                      // Que es justo la que coincide con los nombres de los combos
    comp := FindComponent('ComboBox' + IntToStr(j)); // combobox5, combobox7,...

    TComboBox(comp).Text:= FloatToStr(RandomRange(1, 10));
  end;

Básicamente es "montar" una cadena con el nombre del componente u sar FindComponent para encontrarlo.

o este:

Código Delphi [-]
  Edit3.Clear;
  Edit4.Clear;
  Edit5.Clear;
  Edit6.Clear;
  Edit7.Clear;
  Edit8.Clear;
  Edit9.Clear;
  Edit10.Clear;
  Edit11.Clear;
  Edit12.Clear;
  Edit13.Clear;
  Edit14.Clear;
  Edit15.Clear;
  Edit16.Clear;
  Edit17.Clear;
  Edit18.Clear;
  Edit19.Clear;
  Edit20.Clear;
  Edit21.Clear;
  Edit22.Clear;

Por este otro:

Código Delphi [-]
var
  i:Integer;
  comp:TComponent;
...
  // Recorrido por los edits
  for i := 3 to 22 do begin
    Str := 'Edit' + IntToStr(i);  // edit3, edit4, Edit5,...
    comp := FindComponent(Str);
    TEdit(comp).Clear;
  end;

Espero que te sea últil.

Empezado por Caral

Para mejorarlo he pensado en la posibilidad de que pueda tener varios jugadores y que los nombres como su puntaje se guarden en un archivo texto o ini...
...Se que podria modificarse para mas usos didacticos...

¿Has pensado cómo? ¿Tienes algo en mente?
Me refiero a si ya tienes cosas pensadas y podemos ayudarte a implementarlas o no tienes nada pensado.
Ya que la idea ha sido tuya y la iniciativa también está bien que decidas por donde comenzar...
* Problemas para practicar la memoria.
* Gráficas X,Y
* Fracciones
* MCM y MCD
* ...

[[Caral]]

Hola Neftali
La idea de esto es que cada uno que quiera participar, haga las modificacion y ampliaciones que crea convenientes, las pruebe y las coloque denuevo aqui (Archivo Zip), asi el programa ira creciendo y se iran aprendiendo mas cosas.
Ten como ejemplo las modificaciones que puso egostar, si lo pruebas te daras cuenta que la primera vez funcionan luego no, no se la razon por eso digo que me gustaria que las modficaciones o ampliaciones fueran probadas y colocadas completas aqui, asi el programa crecera con el aporte de todos.
He querido dejar este programa para que casualmente sea un apoyo para los mas novatos como yo.
Con relacion a esto:

¿Has pensado cómo? ¿Tienes algo en mente?
Me refiero a si ya tienes cosas pensadas y podemos ayudarte a implementarlas o no tienes nada pensado.
Ya que la idea ha sido tuya y la iniciativa también está bien que decidas por donde comenzar...
* Problemas para practicar la memoria.
* Gráficas X,Y
* Fracciones
* MCM y MCD
* ...

Pues mi hija necesita saber por ejemplo el area de una circunferencia o cuadrado, o el volumen de estos.
He pensado que con un dibujo de estos y con un edit en donde se den las dimensiones, pueda dar el resultado e igualmente se verifique si esta correcto.
La verdad, pienso que muchas cabezas piensan mas que una y quiero dejar a cada uno hacer lo que estimen bueno para el programa.
Tal vez en vez de llamarse Matematicas felices, se llame matematicas CubDelphi, ya que le pertenece a este ahora, incluso por experiencia puedo decir que se puede publicar, ya que no hay ningun programa verdaderamente didactico para que aprendan matematicas los mas pequeños.
Saludos

[[seoane]]

Caral me parece una idea genial crear un programa para los niños, las matemáticas siempre fueron mi asignatura preferida . Lo que yo cambiaría un poco es la parte gráfica, los niños es en lo primero que se fijaran, o eso supongo hace mucho que no soy un niño (al menos por edad )

Aquí te dejo un pequeño programa para hacer sumas/restas/multiplicaciones, que cree centrándome mas en el aspecto gráfico. Para saber como utilizarlo mueve el ratón sobre las pizarra y sigue los consejos que te de la cara sonriente

Solo es un ejemplo
http://rapidshare.com/files/3470724/FunMaths.zip.html

[[Caral]]

Hola seoane
Me parece increible tu programa, crees que se podria hacerse una mezcla de los dos, para mi sigue siendo como idea que este programa crezca, todo lo que se incorpore a el me parece que sera veneficioso.
Agradezco mucho tu intervencion ya que como maestro podrias hacerle verdaderos cambios, ademas de estupendos.
Quiero que sea parte de todos este programa y que cada quien ponga su grano de arena en el.
Si es posible poner en cada modificacion una nota:

// Esta parte es hecha por ________

Asi cada quien aportara y quedara su marca en el.
Saludos

[[egostar]]

Empezado por Caral

Ten como ejemplo las modificaciones que puso egostar, si lo pruebas te daras cuenta que la primera vez funcionan luego no, no se la razon por eso digo que me gustaria que las modficaciones o ampliaciones fueran probadas y colocadas completas aqui, asi el programa crecera con el aporte de todos.

Efectivamente Caral, el código que puse tenía un detalle que corregi, me imagino, después de que lo copiaste de la primer respuesta, el problema era que yo habia asignado el ComboBox1 para las operaciones de suma,resta, etc y tu lo tienes en el ComboBox3, pues nada lo copiaste antes de actualizarlo, eres muy rápido , debo solicitarte una disculpa por no haber documentado ese cambio.

Saludos.

[[Caral]]

Hola egostar
Por que no aportas cambios al programa, lee mi nota anterior, quiero que participeis con algun cambio y que le pongais la nota correspondiente:

// Esta parte es hecha por ________

o

// Este cambio fue hecho por________

Recordad que en esta vida todo pasa, execpto lo escrito, ese dura mas, para las generaciones siguiente.
No importa si el cambio o la mejora es de dos lineas, lo importante es ponerla.
Saludos