Discussion :

[Jules24]

Bonjour à tous,

Je suis vraiment débutant, et j'ai un problème que je n'arrive pas à résoudre, mais j'espère que parmis vous, certains auront la solution.

Au lancement de mon application, le programme lance une musique avec cette méthode:
My.Computer.Audio.Play("C:\Windows\JM Créations\medias\Logon.wav")

Dans un form "options", j'ai décidé de paramétrer le fait que le programme puisse émettre un son au démarrage et à l'arrêt avec une CheckBox.
Cependant je n'arrive pas à utiliser la méthode My.Settings pour My.Computer.Audio.Play

Comment indiquer à l'ordinateur que... si dans la form "Options", la checkbox "musique" est coché, alors à l'arrêt et au démarrage un son sera émis et inversement?
Voila ce qui me pose probleme...

Bonne journée à tous
Merci d'avance

Jules

[tssi555]

Par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If frmOption.chkMusique.value = True then
My.Computer.Audio.Play("C:\Windows\JM Créations\medias\Logon.wav")
Else
Msgbox("Jules24 ne veut pas vous distraire avec sa musique cette fois-ci, travaillez!") 'par exemple
End If

Mais ce qu'il faut retenir, c'est que la valeur coché/décoché de la case ne gardera pas la valeur que tu lui donne sans la lier.
Je m'explique, la valeur de ta case à cocher doit être liée par exemple à un champs d'une table ou enregistrer sa valeur True/False dans un fichier, .ini par exemple.

[Jules24]

Merci beaucoup tssi555 pour ta réponse.
En fait je lie la fonction coché/déchoché avec My.Settings généralement, qui enregistrer ainsi l'état.

Dans Paramètres de mon projet, j'ai rajouté:
musique_play ++ integer ++ utilisateur ++ valeur= 1

Et lors du clique sur le bouton OK de la form Options, qui décide si la musique est lancée ou pas:
My.Settings.musique_play = musique.Checked
My.Settings.Save()
fenetre1.My.Computer.Audio.Play = My.Settings.musique_play

Cependant, je n'arrive pas à lier le fameux My.Settings à Audio.Play. La dernière ligne, et notamment le: "fenetre1.My.Computer.Audio.Play" qui est souligné dans Visual comme une erreur.
DOnc impossible d'aller plus loin.

Après je suis pas contre me lancer dans un fichier *.ini, mais étant débutant, je ne connait pas du tout cette méthode, je reste habitué à My.Settings, qui me parait bien limité maintenant! ^^

Cordialement,
merci encore