BOUTON FLASH SUR VISUAL BASIC flash, bouton, shockwaveflash1fscommand, fscommand, shockwave, Source N°35668

Information sur la source

Catégorie :Trucs & Astuces Classé sous : flash, bouton, shockwaveflash1fscommand, fscommand, shockwave Niveau : Débutant Date de création : 20/01/2006 Vu / téléchargé: 15 202 / 5 640

Auteur : pentahertz

Ecrire un message privé

Note :

10,00 / 10

1
2
3
4
5
6
7
8
9
10

Commentaire sur cette source (10)

Ajouter un commentaire et/ou une note

Description

retrouver la beauté de vos bouton flash sur visual basic
ce code va vous permettre de communiquer de flash a vb

Source

code flash du bouton
----------------------------
on (release) {
fscommand("setvalue", "Message pour tony");
}
code visual basic
----------------------------
Private Sub Form_Load()
Call ShockwaveFlash1.LoadMovie(0, "bt.SWF")
End Sub
Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)
Text1.Text = args
End Sub
--------------------------------------------------

code flash du bouton
----------------------------
on (release) {
  fscommand("setvalue", "Message pour tony");
}



code visual basic
----------------------------
Private Sub Form_Load()
Call ShockwaveFlash1.LoadMovie(0, "bt.SWF")

End Sub

Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)

Text1.Text = args

End Sub
--------------------------------------------------

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

bt.exe20 480 octets
bt.fla47 104 octets
bt.frm 2 138 octets
bt.SWF 2 181 octets
bt.vbg36 octets
bt.vbp 725 octets

Télécharger le zip

Sources de la même categorie

Toutes les sources de la catégorie Trucs & Astuces

Sources en rapport avec celle ci

Commentaires

Commentaire de jack le 20/01/2006 19:12:10 administrateur CS

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.
Commentaire de jupiter le 23/01/2006 09:18:50

Bonne idée, Bravo !
Commentaire de gothard le 20/03/2006 17:54:22

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!! !
Commentaire de pentahertz le 20/03/2006 18:20:18

il te faut rajouter le composant shockwave flash fichier flash???.ocx
Commentaire de gothard le 20/03/2006 18:32:43

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!!!
Commentaire de amine507974 le 15/04/2006 02:42:21

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.
Commentaire de rahon55 le 05/06/2006 14:59:46

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 ?
Commentaire de webeur le 25/06/2006 11:00:46

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
Commentaire de rahon55 le 26/06/2006 09:25:32

Si j'ai bien compris webeur toi tu passes par une page php nan ?
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 ...
Commentaire de Supersnifeur le 27/05/2007 17:56:19

Bonjour a tous, il n'y aurait pas quelqu'un qui, par hassard, pourrais poster une capture d'écran de ce fameux bouton. Merci

Ajouter un commentaire

Discussions en rapport avec ce code source

bouton flash sur VB par coolestman

Changer un texte dans une anim. flash à partir de VB par Topper

Liaison Flash Graphique - Flash AS par sschupp

[flash MX] Comment atteindre un clip dans un clip par toutouffe

[flash MX] Comment atteindre un clip dans un clip par toutouffe

Question d'un NUL par harald

Stopper un son par djdoms

Fireworks et flash par DM michael

fscommand Flash et VB - for Star only par kuss

Bouton Flash dans VB par turlututuchapopointu