Page 1 sur 1
[..] Problème swf dans form
Posté : dim. 11 sept. 2011 19:09
par toto06
S'il vous plait je veux ouvrir un fichier swf dans mon form pour débuter j'ai pris le code déjà pris sur le forum :
► Afficher le texte
Code : Tout sélectionner
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
Global $oRP = ObjCreate("ShockwaveFlash.ShockwaveFlash.1")
$gui =GUICreate ("Flash", 820, 600, -1, -1)
$GUIActiveX = GUICtrlCreateObj( $oRP, 10, 10 , 800 , 580)
With $oRP
.bgcolor = "#000000"
.Movie = @WindowsDir & '\Help\Tours\mmTour\intro.swf';
.ScaleMode = 2
.Loop = True
.wmode = "Opaque"
.FlashVars = ""
EndWith
GUISetState ()
$gui2 = GUICreate ("", 80, 25, 400, 500, $WS_POPUP, $WS_EX_TOPMOST + $WS_EX_MDICHILD, $gui)
GuiCtrlCreateButton("bouton", 0, 0, 80, 25)
GUICtrlSetState(-1, $GUI_ONTOP)
GUISetState ()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
EndSelect
WEnd
$oRP = 0
GUIDelete ()
Exit
Mais j'ai comme erreur :
Line 8
With $oRP
With ^ ERROR
Only Object-type variables allowed in a "With" statement.
J'ai changé le lien du fichier swf mais sans solution
Merci d'avance
Re: [..] Problème swf dans form
Posté : dim. 11 sept. 2011 19:15
par moi
[quote=que dis google traduction]Seuls les objets variables de type autorisé dans une «Avec« déclaration. [/quote]
Re: [..] Problème swf dans form
Posté : dim. 11 sept. 2011 21:10
par toto06
moi a écrit :que dis google traduction a écrit :Seuls les objets variables de type autorisé dans une «Avec« déclaration.
je recherche de l'aide une traduction on sais tous faire çà même ma petite soeur de 10 ans sait le faire .
Re: [..] Problème swf dans form
Posté : lun. 12 sept. 2011 05:38
par Yogui
Ce code fonctionne chez moi sans problème j'ai ajouter une vérification de version flash
► Afficher le texte
Code : Tout sélectionner
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
Global $oRP = ObjCreate("ShockwaveFlash.ShockwaveFlash.9")
If @error Then Exit MsgBox(16,"pb","Flash non dispo, adaptez le script à votre version")
$gui =GUICreate ("Flash", 820, 600, -1, -1)
$GUIActiveX = GUICtrlCreateObj( $oRP, 10, 10 , 800 , 580)
With $oRP
.bgcolor = "#000000"
.Movie = @DesktopDir & '\sourisdetricote1.swf';
.ScaleMode = 2
.Loop = True
.wmode = "Opaque"
.FlashVars = ""
EndWith
GUISetState ()
$gui2 = GUICreate ("", 80, 25, 400, 500, $WS_POPUP, $WS_EX_TOPMOST + $WS_EX_MDICHILD, $gui)
GuiCtrlCreateButton("bouton", 0, 0, 80, 25)
GUICtrlSetState(-1, $GUI_ONTOP)
GUISetState ()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
EndSelect
WEnd
$oRP = 0
GUIDelete ()
Exit
Adresse du swf :
http://www.leconcombre.com/dl/mov1/sour ... e1.swf.zip
Re: [..] Problème swf dans form
Posté : lun. 12 sept. 2011 17:53
par toto06
Il me donne le message d'erreur que t'as mis :Flash non dispo, adaptez le script à votre version.
J'ai macromedia flash 8 je dois mettre quoi dans version ? j'ai essayer de mettre le 8 à la place du 9 mais sans solution
Re: [..] Problème swf dans form
Posté : lun. 12 sept. 2011 21:53
par Yogui
Si vous avez le message d'erreur que j'ai ajouter il faut juste le lire
Vous dites que vous êtes en version 8 mais que ça ne fonctionne pas alors il faut mettre autre chose 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 -10 - 11
sinon vous pouvez installer la
Dernière version et tester avec 11 ou 10