cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 2015
-
20 janv. 2006 à 19:12
Supersnifeur
Messages postés2Date d'inscriptionsamedi 19 mai 2007StatutMembreDernière intervention 1 juin 2008
-
27 mai 2007 à 17:56
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
Private Sub Form_Load()
toto.Movie = App.Path & "\flash.swf" 'toto est un composant shockwave
End Sub
____________________________________________________________________________
Private Sub toto_FSCommand(ByVal command As String, ByVal args As String)
Select Case command 'l'equivalent du switch en Flash
Case "bouh" ' variable dans flash.swf
toto.SetVariable "message", args ' c'est SetVariable qui récupere la valeur "message" dans mon flash.swf
Case "coucou"
'je fais autre chose
End Select
End Sub
Merci quand même pour quand même pour ta reponse
A bientôt sur vbfrance ...
cs_webeur
Messages postés21Date d'inscriptionmercredi 11 mai 2005StatutMembreDernière intervention25 juin 2006 25 juin 2006 à 11:00
rahon => quand tu charge le swf met ceci en plus => ?tavariable=valeur
et pour la récupérer dans flash c'est _root.tavariable
sinon si tu ne veux pas rafraichir ton anim, enregistre la variable dans un fichier avec VB (utilisant la structure tavariable=variable)
puis avec flash récupère le fichier avec loadvars()
et recherche la variable
rahon55
Messages postés6Date d'inscriptionvendredi 21 octobre 2005StatutMembreDernière intervention13 mars 2008 5 juin 2006 à 14:59
Salut à tous, c'est cool que vb arrive à chopper une variable flash (moitié de mon travail..), mais je veux les faires communiquer entre eux et donc:
- comment faire pour envoyer une variable vers flash et qu'il la récupère ?
amine507974
Messages postés1Date d'inscriptionlundi 12 septembre 2005StatutMembreDernière intervention15 avril 2006 15 avril 2006 à 02:42
Salut ! C'est trés bien , je l'ai essayé pour d'autre annimation flash et ça marche bien , pour ceux qui n'arrivent pas à le faire marcher qu'ils ajoutent le code suivant au form_load :
ShockwaveFlash1.Movie = App.Path & "\bt.swf"
ou bien changer le chemin d'acceé du ficher bt.swf dans les propriétés du ShockwaveFlash1 changer le chemin dans Movie.
cs_gothard
Messages postés21Date d'inscriptiondimanche 20 février 2005StatutMembreDernière intervention20 mars 2006 20 mars 2006 à 18:32
MErci pour ta reponse ;-)
Je l'ai fait (ajouter le composant shockwave flas) ...En fait, quand je compile, je ne vois pas le bouton Flash. J'ai pourtant bien mis tout dans le même repertoire...pige po!!!
pentahertz
Messages postés28Date d'inscriptiondimanche 13 avril 2003StatutMembreDernière intervention 6 novembre 2007 20 mars 2006 à 18:20
il te faut rajouter le composant shockwave flash fichier flash???.ocx
cs_gothard
Messages postés21Date d'inscriptiondimanche 20 février 2005StatutMembreDernière intervention20 mars 2006 20 mars 2006 à 17:54
Salut, a tous ;-) J'ai fait des tests, je m'excuse mais le Tuto ne marche po chez moi. Qlq'un peu m'expliquer? Je sais c bête..aïe..aïe...doucement.. mais bon, marche po chez moi!! !
cs_jupiter
Messages postés34Date d'inscriptionlundi 5 août 2002StatutMembreDernière intervention 9 janvier 2009 23 janv. 2006 à 09:18
Bonne idée, Bravo !
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 20 janv. 2006 à 19:12
Cool : Elle est sympa cette OCX.OCA de Flash, je connaissais pas.
Il faut bien sûr que Macromedia Flash Player soit installé sur la machine.
27 mai 2007 à 17:56
26 juin 2006 à 09:25
J'ai réussi a trouver plus directement:
____________________________________________________________________________
Private Sub Form_Load()
toto.Movie = App.Path & "\flash.swf" 'toto est un composant shockwave
End Sub
____________________________________________________________________________
Private Sub toto_FSCommand(ByVal command As String, ByVal args As String)
Select Case command 'l'equivalent du switch en Flash
Case "bouh" ' variable dans flash.swf
toto.SetVariable "message", args ' c'est SetVariable qui récupere la valeur "message" dans mon flash.swf
Case "coucou"
'je fais autre chose
End Select
End Sub
____________________________________________________________________________
Merci quand même pour quand même pour ta reponse
A bientôt sur vbfrance ...
25 juin 2006 à 11:00
et pour la récupérer dans flash c'est _root.tavariable
sinon si tu ne veux pas rafraichir ton anim, enregistre la variable dans un fichier avec VB (utilisant la structure tavariable=variable)
puis avec flash récupère le fichier avec loadvars()
et recherche la variable
5 juin 2006 à 14:59
- comment faire pour envoyer une variable vers flash et qu'il la récupère ?
15 avril 2006 à 02:42
ShockwaveFlash1.Movie = App.Path & "\bt.swf"
ou bien changer le chemin d'acceé du ficher bt.swf dans les propriétés du ShockwaveFlash1 changer le chemin dans Movie.
20 mars 2006 à 18:32
Je l'ai fait (ajouter le composant shockwave flas) ...En fait, quand je compile, je ne vois pas le bouton Flash. J'ai pourtant bien mis tout dans le même repertoire...pige po!!!
20 mars 2006 à 18:20
20 mars 2006 à 17:54
23 janv. 2006 à 09:18
20 janv. 2006 à 19:12
Il faut bien sûr que Macromedia Flash Player soit installé sur la machine.