Discussion :

[mofetil]

Bonjour
Tout d'abord je m'excuse si le titre est peu clair mais je n'ai pas pu faire mieux!
Mon problème est le suivant: J'ai réussi, après des semaines de travail (oui, je suis un peu débutant) à écrire un logiciel, sur VB6, qui dessine les graphs correspondant à des fonctions (2D ou 3D)...
La fonction que je veux representer graphiquement est saisie dans une module à l'intérieur du code du logiciel,
Par exemple...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Public Function Z(X,Y)
Z=cos(x)*sin(y*5)
End Function

Mais comme je voulais faire profiter mes amis de ce logiciel, le seul moyen serait de le transformer en fichier executif .exe, et là vous voyez le problème: on ne peut plus changer la fonction qu'on veut dessiner... le programme prend la même fonction qui est intégrée à son code.
J'aimerais savoir si quelqu'un d'entre vous a une solution à me donner, car je me torture le cerveau sur ce détail depuis un certain temps et je trouve pas de réponse... j'aimerais bien pouvoir saisir une fonction dans une boite de dialogue TEXTE, après le lancement du programme bien sûr... mais comment faire pour integrer dans le programme la fonction qu'on a saisie sous format textuel??
Merci d'avance pour votre aide.

[zazaraignée]

Salut

Bienvenue sur Développez

Tu aurais avantage à créer un kit d'installation de ton programme. Après avoir ajouté (si ce n'est déja fait) ton éditeur d'équation en référence dans ton projet, tu enregistre tout ça. Tu éteint VB. Tu Démarrer, Programmes, Microsoft Visual Basic, Outils Microsoft Basic (chez moi Microsoft Visual Basic Tools, parce que je l'ai en anglais...) et enfin Assistant d'empaquetage et déploiement (ou Package & Deployment Wizard). Tu suis les instructions et tu crée un kit d'installation pour ton programme sur lequel tu as si durement buché. A la fin, c'est la joie.

Si tu jète un oeil (n'oublie pas de le reprendre ensuite) sur la page des outils VB, tu trouvera InnoSetup et IsTool qui font du bon boulot à l'allure professionnelle.

J'ai ajouté les balises Code à ton bout de code. C'est le bouton #. Une habitude à prendre...

[Edit]: en relisant ton message j'ai bien vu qu'il s'agissait d'un module interne... Comment l'utilisateur choisit-il la fonction et les paramètres pour afficher le graphe? C'est là que tu dois plancher... Du moins, je crois. J'ai tout de même laissé mon message tel quel... des fois que ça servirait.

[jmfmarques]

Utiliser Eval, entre autres...

Ou (à mon avis mieux) faire un ocx avec toutes les types de fonctions possibles (il n'y en a pas des masses) attendant des paramètres venant de l'aplication (textboxes renseignées par l'utilisateur, par exemple)

[mofetil]

Merci pour vos deux réponses. Mais:

1-je n'ai pas réussi à trouver quoi que soit qui s'appelle Eval dans mon aide Visual Basic...
Est ce que tu voulais dire Val? Mais, par exemple,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Val("sin(x)")

ne retourne rien... la fonction Val() retourne juste des chiffres mais ne calcule pas une fonction...
Ou bien existerait-il une autre fonction EVal??

2-je ne sais pas créer des ocx si tu pouvais m'indiquer un tutoriel qui parle de ça, et me donner une idée une idée sur comment profiter d'un ocx pour faire entrer des fonctions mathématiques, je te serais très reconnaissant...

Merci

[jmfmarques]

1) pour eval :

http://vb.developpez.com/faq/?page=L...rpreter_string
mais lis aussi ce que tu trouveras là :
http://www.aivosto.com/eval.html

2) pour les ocx :
Je trouve tout un cours à la rubrique Tutoriels !
en voici un petit bout :
http://activex.developpez.com/

ceci étant dit : si tu veux faire un ocx, il te faudra du soin, des connaissances ... et lire tout à fond, à commencer par l'aide en ligne.

Bonne étude .

[mofetil]

Je t'en remercie beaucoup...
Je pense bien que la fonction Eval porte la solution à toutes mes souffrance!
Mais le problème c'est que je n'arrive pas à la faire marcher!
J'ai appliqué tout ce qui a été dit dans le tutoriel que tu m'avais donné mais en vain... j'ai le message suivant concernant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim r as New ScriptControl

"Invalid use of New statement"
Je précise que j'ai VB5, contrairement à ce que j'avais dit plus haut... je viens de m'en apercevoir...
Est-ce que ça peut venir de là?? Par contre je possède msscript... j'en sais rien, je suis de nouveau complétement frustré!!
Le fichier d'Aide qui vient avec MSSCRIPT est très résumé et n'explique pas du tout la façon dont je peux me servir de la fonction Eval()
Tu as le temps de me donner des précisions??
En tout cas je te remercie bcp une deuxième fois.

[mofetil]

JE VIENS DE TROUVER LA REPONSE SUR LE SITE MICROSOFT!!!!!!!!
En fait le plus simple c'était de rajouter un objet ScriptControl sur la Form1, de le rajouter à la main, je veux dire comme on rajoute une zone text sur une Form... puisque ScriptControl apparait à droite avec les autres objets après avoir ajouté Microsoft Script Control dans Project>Components.
Et puis il faut faire par exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
ScriptControl1.Language = "vbscript"
S = ScriptControl1.Eval("sin(1.5)*cos(1.5)")
Print S

ça donne la valeur de sin(1.5)*cos(1.5)

Je suis tellement content d'avoir posté sur ce forum!!! Car j'avais vraiment envie d'achever ce programme et j'y arrivais pas!!!
Merci beaucoup pour ton aide!!