probleme boutton

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

tu n'a fait aucune erreur !!

il faut que tu comprenne que lorsque tu fait

Code : Tout sélectionner

  NomFichier$ = OpenFileRequester("Titre", "::{450d8fba-ad25-11d0-98a8-0800361b1103}\" , "Fichiers|*.*", 0) 
tu met dans " NomFichier$ " le chemin pour aller chercher le fichier !!
mais ce fameux fichier n'est pas chargé !! , tu as simplement indiquer au programme ou ce trouvais le fichier !!
maintenant il faut effectivement le charger !!!!

avec "LoadMovie(1, NomFichier$) " ; la le son sera chargé !!! et seulement la
tu pourra le faire jouer !!!
:D

ne pas oublier qu'en utilisant les fonctions "Movie" il faut auparavant les initialiser !! en placant

Code : Tout sélectionner

Resultat = InitMovie() 
au debut du listing !!! :D
Avatar de l’utilisateur
venom
Messages : 3137
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Message par venom »

a ok c'est pourca que j'arriver pas a avoir le son si non sa va j'ai un peux mieu comprie avec ton esplication mais c'est vraiment pas facile la programation c'est normal je vien juste de commancer :D :wink: fodrait que je trouve des bouquin ou il y aure plin d'exemple et des esplication sa doit exister .donc je vais essayer de trouver ou placer ton code

Code : Tout sélectionner

LoadMovie(1, NomFichier$)
dans ma prog encore et toujour merci de ton aide tres precieu :wink: en faite au final c'est toi qui aura fait mon lecteur musique :D :wink: aler @++
Avatar de l’utilisateur
venom
Messages : 3137
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Message par venom »

desole dobro mais j'arrive pas a trouver la solution pour pouvoir metre de la musique :oops: j'ai beau lire le fichier d'aide je n'arrive pas a comprendre :oops: c'est embarassant pourrait tu encore et toujours m'aider :D :wink:

@++
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

c'est pourtant tres simple !! :lol: :lol:

voici la solution :

prend le temp de regarder chaques fonctions en selectionant la fonction et en appuyant sur la touche F1 tu aura de cette facon le descriptif de la fonction choisi ! :D

Code : Tout sélectionner

 ; puisque nous allons utiliser les fonction de movie
; on initialise d'abord !!




Resultat = InitMovie() 



Enumeration
    #Window_0
EndEnumeration

;- Gadget Constants
;
Enumeration
    #liste
    #play
EndEnumeration

; Le Programme !!
Procedure Open_Window_0()
    If OpenWindow(#Window_0, 218, 67, 600, 300,  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "New window ( 0 )")
        If CreateGadgetList(WindowID())
            ButtonGadget(#liste, 20, 10, 210, 40, "Play liste")
            ButtonGadget(#play, 280, 10, 250, 40, "play")
        EndIf
    EndIf
EndProcedure


Open_Window_0()

Repeat ; Boucle Principale !! 
    Event = WaitWindowEvent()
    
    If Event = #PB_EventGadget
        
        ;Debug "WindowID: " + Str(EventWindowID())
        
        GadgetID = EventGadgetID() ;<-------- obligatoire lors de l'utilisation de gadjets !!
        
        ; ci-dessous les choix offert par les 2 Bouton de la fenetre !!!!
        If GadgetID = #liste ; choix du bouton a gauche (liste) 
            
            ; ici on indique ou ce trouve le son !
            NomFichier$ = OpenFileRequester("Titre", "::{450d8fba-ad25-11d0-98a8-0800361b1103}\" , "Fichiers|*.*", 0)
            LoadMovie(1, NomFichier$) ; donc on le charge , puis qu'on connais sa localisation (dans  NomFichier$) 
            
        ElseIf GadgetID = #play ; choix du bouton a droite (play)
            ; si le gars clique sur play 
            
            PlayMovie(1, FenetreID)  ; on joue le son !!!  (le chiffre 1 indique que nous jouons le fichier charger numero 1 )
            
            
        EndIf
        
    EndIf
    
Until Event = #PB_EventCloseWindow

End  
Avatar de l’utilisateur
venom
Messages : 3137
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Message par venom »

:D franchement dobro tu et un mac tu a meme fait pour que j'appuie sur le boutton play franchement merci :D je ne sait quoi dire 8O :?
je te remercie .

c'est vrai j'ai tendence a oublier la touche f1 c'est un inconveignant je sait mais bon . bon maintenant je vais essayer de me debrouiller pour la suite de mon projet :wink: :D a essayer de changer l'aspet de la fenetre ou des icones pour les bouttons play je pense que je suis trop debutant pour faire sa mais je vais essayer de trouver des codes qui esplique commant faire encore merci a toi :D

@++
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

franchement dobro tu et un mac
heu ben franchement pas vraiment !!
les filles je les garde pour moi !! j'en fais pas commerce !! ,je suis trop perso sur ce coup la !! :lol:
Avatar de l’utilisateur
venom
Messages : 3137
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Message par venom »

lol :D ouai mais tu a raison de garder les filles pour toi moi je garde ma meuf pour moi :wink: c'est tout a fait normal

et regarde si je veux que le boutton play fait aussi option stop ou meme un autre boutton d'ailleur fo que je met 0 a la place de 1 c'est bien sa si je me trompe pas

Code : Tout sélectionner

PlayMovie(1, FenetreID)
car je croi que le 1 c'est pour activer donc logiquement le 0 c'est pour desactiver
nico
Messages : 3702
Inscription : ven. 13/févr./2004 0:57

Message par nico »

Utilise l'aide 8O
Avatar de l’utilisateur
venom
Messages : 3137
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Message par venom »

a oui c'est j'oublie souvent de faire f1 desoler je vais voir dans aide :D :wink:
Répondre