VB.NET - Lecture en boucle d'un fichier Flash dans un FormRésolu

Question

Bonjour a tous et, tout d'abord, merci a ceux qui prendrons le temps de lire ma question de débutant.

Je me suis mis en tête de faire tourner en boucle dans un form un fichier .swf ... Ne me dites pas de regarder dans le forum, cela est déja fait, mais les codes sont en VB6 (si je ne me trompe pas).

J'ai codé cela mais ca bloque au niveau de l'affichage dans le form ( RIEN ne s'affiche ). En regardant de plus près les exemples en VB 6, je me suis apercu qu'un composant AxShockwaveFlashObjects avait crée un espace dans le form. Comme vous allez le constaté j'utilise un ShockwaveFlashObjects.ShockwaveFlash après avoir ajouté un référence "Shockwave Flash" provenant de COM. Je la declare et la défini uniquement en code car je n'ai pas trouver de composant dans les composants en mode visuel. Je me rend compte que je problème DEVRAIT se trouver là mais je n'y arrive pas...

Public

Class Form1

Dim MonLecteur 
As
New ShockwaveFlashObjects.ShockwaveFlash

Public
Sub
New()InitializeComponent()
MonLecteur.Base ""MonOpenFile.Filter 

"Fichiers Shockwave Flash(*.swf)|*.swf"MonOpenFile.ShowDialog()

With MonLecteur.Movie = MonOpenFile.FileName

.Play()

End
With

End
SubEnd

Class

Piloutech · Accepted Answer

Rebonjour

J'ai trouvé la solution et donc je la partage pour ceux qui cherche encore .

Résumons tout ce qui a été dit (sous VS2005),Il faut :
-Ajouter un référence "Shockwave Flash" ( COM ) dans la solution du projet.
-Fermer le projet.
-Télécharger http://blogs.vbcity.com/upload/drydo/AxInterop.ShockwaveFlashObjects.dll et le placer dans le obj\debug du projet.
-Réouvrir le projet.
-Boite à outils-click droit-choisir les éléments-onglet Composants COM-coche Shockwave Flash Object pour le faire apparaitre dans la boite à outils.
-Déposer cet élément sur le form et tapper votre code 

Exemple de morceau de code :

With MonFlash


.Movie = MonCheminDeFichier


.Play()



End



With

En remerciant ceux qui m'ont aidé 

Piloutech

cs_casy · Answer

Tu n'as pas trouvé le composant parce que tu ne l'as pas ajouter.

Tu vas sur la boite à outils, click droit, choisir les éléments, onglet Composants COM et tu coche Shockwave Flash Object et là miracle il apparait dans la boite à outils.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

Piloutech · Answer

Merci pour ta réponse rapide casy, mais malheureusement j'y avais déja pensé. Au moment de déposer  Shockwave Flash Object, il me met l'erreur : Echec de l'importation du controle ActiveX. Assurez-vous qu'il est correctement inscrit.

Piloutech

le5ejumeau · Answer

Bonjour, 

Apparament tu utilise vb.net 2005 . IL me semble que se composant ne marche pas sous 2005 alors qu'il marche trés bien sous 2003 (à vérifier)

Piloutech · Answer

J'espere que tu te trompe le5ejumeau  .Car j'ai besoin de faire tourner ca ... Ca serait bizarre que ca soit ok 2003 et pas 2005

Merci qd meme le5ejumeau 

Piloutech

cs_bidouille007 · Answer

Réponse acceptée mais ou est la commande pour mettre en boucle la lecture de la vidéo swf ?

007bidouille

VB.NET - Lecture en boucle d'un fichier Flash dans un Form

6 réponses

Votre réponse

Discussions similaires