![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|
|
#1
|
|||
|
|||
|
ecuaciones
Gracias por tu respuesta, pero me has entendido mal. Yo sé como resolver las ecuaciones, pero lo que quiero es plantearle la ecuación al programa y que éste lo resuelva. Muchas gracias de todos modos.
|
|
#2
|
|||
|
|||
|
Mira lo que puedes hacer es:
||EDIT_A||x ||EDIT_B|| = ||EDIT_C|| Esto seria el form, junto con un botón que ponga "Calcular" o algo por el estilo y luego haces lo que ha dicho Robert01; x := (||EDIT_C EDIT_B||)/||EDIT_A||;Recuerda que tienes que convertir el valor de cada edit a integer i que x ha de ser de tipo float. Si quieres hacerlo de otra forma, por ejemplo, un edit que el usuario le indica toda la equación, el programa ha de hacer: 1.- Separar los valores con X de los que no tienen X, por ejemplo podrias usar la función Copy() y la función Pos(). 2.- Obtener el valor final de las partes CON X y de las partes SIN X. 3.- Hacer lo mismo que antes, X := PARTES_SIN_X/PARTES_CON_X Has de tener en cuenta que cuando extraigas los valores has de sacar el signo de este también, me explico? |
|
#3
|
|||
|
|||
|
ecuaciones
Gracias por tu respuesta, pero lamento decirte que no me funciona.
Si hago la primera opción ( que no haría lo que busco porque limitaría el resultado a una opción de producto a un lado de la igualdad y un único término al otro lado), pero aun así: edit3.text:= floattostr(strtofloat(edit1.text) * strtofloat(edit2.text)); //Solo funciona poniendo un término en cada edit. Y la otra opción que me das tal vez funcione pero no sé usar las funciones que me dices. De ésta última te agradecería si me mandas el código. Gracias nuevamente. |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| Ecuaciones Diferenciales en Delphi? | ingarmen | Varios | 1 | 25-02-2005 01:45:42 |
| Componente para resolver sistemas de ecuaciones no lineales? | manueles | OOP | 2 | 25-12-2003 06:28:39 |
|