Ecuacion en Javascript a Delphi
Bueno, mi problema, es que tengo la siguiente ecuacion en JavaScript, y necesito convertirla a Delphi, hasta ahora, yo creo haberla echo bien, pero resulto que me tira un error de Float, y estoy medio perdido.
Funcion en JScript: Código:
function Encode(str, fld,fld2) {
Mi funcion es media precaria, porque intente mil maneras distintas. Si no se entiende bien lo que hice, diganme, que intento limpiarla. Saludos. |
y si pruebas esto...
Sin entrar en si tu función es correcta o no, e indicando que lo único que necesitas es convertir la función JScript en Delphi, ¿por que no pruebas esto?...
Espero que te sirva o si no háznoslo saber |
Entrando en tu función...
1.- Tienes un bucle que empieza en 11111 y sumas las 5 primeros cifras del Edit1 de tu form y si esa suma es igual a 33, haces algo... la primera suma que cumple es 15999; es decir, tras 4888 iteraciones tu programa empieza a funcionar. 2.- Cuando tu función empieza a funcionar se encuentras con la función exp(); la cual eleva el número e a la potencia indicada que en este caso, y sólo en la primera iteración alcanza un valor de 1.488.089,54342037 y recordadon que el número e tiene un valor de 2,71 pues resulta que ese número es más de lo que todas las riquezas del mundo juntas en euros y claro al delphi eso le parece mal... 3.- Revisa tu función. |
Cita:
Gracias, estoy en ello. La iteracion, era para no tener que hacer la comprobacion a mano de si estaba funcionando, le puse la iteracion, para que automaticamente me agregue a la lista, cuando la respuesta sea correcta, y no agregue nada en caso contrario. Osea, quice matar dos pajaros de un tiro, hacer la funcion, y ademas comprobarla. Gracias por la respuesta. Saludos. |
Estube probando tu funcion, y no entiendo por que usaste XOR, el simbolo "^" en Jscript, no significa "Elevado"?
Saludos. |
La franja horaria es GMT +2. Ahora son las 07:49:46. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi