Compilation dynamique avec variable

Bonjour à tous,


J'aimerais bien calculer des formules contenant des variables:

Code:

---

1 2 3

sRc="RENVOYER "+ "nInta+nIntb+32" sRes est une chaîne sRes=Compile("MonCalcul",sRc)

---

Malheureusement, il ne connait pas les deux variables nInta et nIntb déclaré avant. Est-ce qu'il y a un autre moyen de les utiliser dans une chaine ?

Sachant que les variables doivent se trouver dans la chaine et pas :

Code:

---

sRc="RENVOYER "+ nInta+nIntb+32

---

Bonjour,

Dans ton exemple, tu renvoies le résultat de l'addition ? ou la syntaxe de l'addition ?

Mais je n'arrive pas à voir l'utilité de la compilation dynamique. :?

Je veux renvoyer le résultat d'une formule qui est une chaine de caractères.

ok, à mon avis, un simple

Code:

---

RENVOYER Val(<maFormule>)

---

devrait faire l'affaire

Bonjour,

La compilation dynamique crée une fonction.
Soit les variables sont locales et doivent être déclarées dans le code de cette fonction.
Soit les variables sont partagées avec le projet hôte, et là il faut qu'elles soient globales.

Non, malheureusement il me renvoit 0.

Je m'explique. J'aimerais bien que les utilisateurs puisse modifier les constantes d'une formule.

formule=a+b+23

L'utilisateur peut la changer en = a+b+22

Donc je récupère la formule sous une chaîne de caractères "a+b+22", avec a et b connu dans le code.

J'aimerais bien récupérer le résultat de cette chaîne de caractère.

Code:

---

1 2 3 4 5 6

ninta est entier = 15 nintb est entier = 2 sRc est une chaîne ="RENVOYER Val(nInta+nIntb+32)" sRes est une chaîne sRes=Compile("MonCalcul",sRc) Trace(ExécuteTraitement("MonCalcul", trtProcédure))

---

Ca me donne 49 comme résultat.
Avec l'explicatif d'Hibernatus, ça devrait bien t'aider.

Bonjour,

Citation:

---

...Donc je récupère la formule sous une chaîne de caractères "a+b+22", avec a et b connu dans le code....

---

Si "a" et "b" on était déclaré au préalable en amont du code, alors vous pouvez vous en sortir avec de l'indirection.

en reprenant votre code du premier post cela donnerait :

Code:

---

1 2 3

sRc="RENVOYER {nInta,indVariable} + {nIntb,indVariable} + 32" sRes est une chaîne sRes=Compile("MonCalcul",sRc)

---

Dans mon cas la formule est une chaine:

Code:

---

1 2	ch est une chaine="a+b+22" sRc est une chaîne ="RENVOYER Val(ch)"

---

En fait, ch est un champ de saisie.
Il me renvoit une erreur parce qu'il ne connait pas a et b.

Ta réponse renvoi à la remarque d'Hibernatus... si "a" et "b" n'ont pas été déclarer en amont local ou en global... tu auras toujours une erreur de compilation.

d'ailleurs dans ton code :

Code:

---

1 2	ch est une chaine="a+b+22" sRc est une chaîne ="RENVOYER Val(ch)"

---

Je n'ai tjs pas compris le but à atteindre, tu es d'accord que "a" doit avoir une valeur et que "b" doit avoir une valeur ? Donc même en compilation dynamique il doit y avoir quelque part dans ta fenêtre ou projet un moment où tu affecte "a=154" et "b=111" par exemple ?

Lo² : Votre formule n'est pas une chaîne lue à l'exécution et le Val est inutile. (en fait vous faites 2 conversions implicites pour rien en plus du Val)

Bon...
Insérez ce code dans le code d'init du projet ou dans le code de déclaration de la fenêtre :

Code:

---

1 2	gnA est un entier = 41 gnB est un entier = 1

---

Puis dans votre code de test :

Citation:

---

Compile("TestCpl", "gnA += gnB")
ExécuteTraitement("TestCpl", trtProcedure)
Trace("42 + 1 = " + gnA)

---

(c'est écrit de tête, corrigez les erreurs de syntaxe si nécessaire)

Mais pour faire ce que vous faites, vous pourriez aussi bien remplacer les noms de variables par leurs valeurs dans la chaîne avec la fonction Remplacer().

Certes dans mon exemple, il s'agit d'une double conversion mais je peux rajouter les guillemets si tu veux.
Ce que je voulais démontrer à notre interlocuteur, c'est que la Val(..) que je lui avait donné, ne donnait pas 0 comme résultat :)

Après, malgré tout, quand on regarde l'aide sur Val(..), cela peut-être intéressant lorsque ses formules seront plus complexes.

@Ry_Yo : Les variables a et b dans mon exemple sont bien déclaré dans le code avant l'execution de la formule. Cependant, pour une question de visualisation pour le client les variables doivent rester dans la formule et non remplacer par leurs valeurs.


@Hibernatus34: Si j'encode ton exemple:

Code:

---

1 2 3 4 5

gnA est un entier = 41 gnB est un entier = 1 Compile("TestCpl", "gnA += gnB") ExécuteTraitement("TestCpl", trtProcédure) Trace("42 + 1 = " + gnA)

---

Il me renvoie une erreur : 'gnB Inconnu'

Attention Hibernatus a bien précisé qu'il faut que les déclarations des variables soient globale au projet ou à la fenêtre exécutant le compile().

Le code que tu as écris laisse supposé que tout est écrit au même endroit ?

EDIT : Â mon sens ton souci est toujours le même quelque soit les tests, c'est la portée de tes variables. pour qu'elles soient visible dans le "compile()" il faut une déclaration globale (fenêtre ou projet, car on ne peut pas passer leur déclaration en paramètre au compile()).

Effectivement, je n'ai pas fait attention à la portée de mes variables. Je dois les mettre en global, ce qui est logique...


Merci beaucoup pour vos aides !

Citation:

---

Envoyé par Lo²

Certes dans mon exemple, il s'agit d'une double conversion mais je peux rajouter les guillemets si tu veux.
Ce que je voulais démontrer à notre interlocuteur, c'est que la Val(..) que je lui avait donné, ne donnait pas 0 comme résultat :)

Après, malgré tout, quand on regarde l'aide sur Val(..), cela peut-être intéressant lorsque ses formules seront plus complexes.

---

Val() ne fait qu'un type-cast chaîne vers entier, ça n'évalue pas une formule.

Ceci affichera bien 0 :

Code:

---

1 2	b est un entier = 41 Trace(Val("b + 1"))

---

Et ce ceci affichera 10 :

Code:

---

Trace(Val("1e1 + 32"))

---