kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 22 déc. 2005 à 20:27
vb 6
j'ai un prog qu'un pote ma refile mais je suis bloque car il y aun control qui s'apel
x10control mais il n'a pas charger au demarage de vb6 et je ne sais pas par quoi le remplacer
le prog et un lecteur multimedia
kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 22 déc. 2005 à 20:40
voici un bout de code ce sera peut etre plus clair le probleme est en rouge et en bleu le control qui pose souci
Private Sub X10Control1_X10Command( _
ByVal bszCommand As String, _
ByVal eCommand As X10Ctl.EX10Command, _
ByVal lAddress As Long, _
ByVal EKeyState As X10Ctl.EX10Key, _
ByVal lSequence As Long, _
ByVal eCommandType As X10Ctl.EX10Comm, _
ByVal varTimestamp As Variant)
If EKeyState = X10KEY_OFF Then
Select Case bszCommand
Case "A" 'Bouton coupure du son
If WMP.settings.mute = False Then
WMP.settings.mute = True
Else
WMP.settings.mute = False
End If
Case "VolumeUp" 'Bouton Volume -
WMP.settings.volume = WMP.settings.volume - 5
Case "VolumeDown" 'Bouton Volume +
WMP.settings.volume = WMP.settings.volume + 5
Case "Play" 'Bouton lecture
WMP.Controls.play
Case "Pause" 'Bouton pause
WMP.Controls.pause
Case "Stop" 'Bouton Stop
WMP.Controls.stop
Case "Forward" 'Bouton avance rapide
WMP.Controls.fastForward
Case "Rewind" 'Bouton retour rapide
WMP.Controls.fastReverse
Case "MTEnter" 'Bouton Plein écran
On Error Resume Next
If WMP.fullScreen = False Then
WMP.fullScreen = True
Else
WMP.fullScreen = False
End If
Case "MTAlbum" 'Bouton Video desktop
'permé de faire apparaitre et disparaitre la fenètre à coté de l'heure
If Me.Visible = False Then
mnuagrandir_Click
Else
MnuRéduire_Click
End If
Case "Ok" 'Bouton OK
'Permé le l
Vous n’avez pas trouvé la réponse que vous recherchez ?
Le contrôle dont tu parles est sûrement un contrôle Multimédia dans le genre Mediaplayer (lecteur Cd)
Demande à ton pôte qu'il te files le fichier Ocx du controle,enregistre-le dans ton répertoire Windows\System32 et charge le dans ton projet par ajour de composants et celà devrait marcher
A part celà bonnes fêtes
GRENIER Alain