begin process at 2010 09 03 06:19:14
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Multimedia

 > LECTEUR AVI (AUDIO VIDEO INTERLEAVED)

LECTEUR AVI (AUDIO VIDEO INTERLEAVED)


 Information sur la source

Note :
6,57 / 10 - par 14 personnes
6,57 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Multimedia Classé sous :lecteur, avi, video, audio Niveau :Débutant Date de création :15/01/2002 Date de mise à jour :15/01/2002 13:35:25 Vu / téléchargé :89 508 / 3 179

Auteur : NeoMorph

Ecrire un message privé
Commentaire sur cette source (18)
Ajouter un commentaire et/ou une note

 Description

C 1 lecteur AVI tout simple mais efficace!
Il n'y a rien de compliqué dedans.

Source

  • Private Sub Dir_Change()
  • File.Path = Dir.Path
  • File.Pattern = "*.avi"
  • End Sub
  • Private Sub Drive_Change()
  • Dir.Path = Left$(Drive.Drive, 2) + "\"
  • File.Path = Dir.Path
  • File.Pattern = "*.avi"
  • End Sub
  • Private Sub Form_Load()
  • Dir.Path = "c:\"
  • File.Path = "c:\"
  • File.Pattern = "*.avi"
  • MMControl1.Notify = False
  • MMControl1.Wait = False
  • MMControl1.Shareable = False
  • MMControl1.DeviceType = "AVIVideo"
  • End Sub
  • Private Sub Jouer_Click()
  • MMControl1.Command = "Close"
  • If Right$(Dir.Path, 1) = "\" Then
  • nom = Dir.Path + File.FileName
  • Else
  • nom = Dir.Path + "\" + File.FileName
  • End If
  • MMControl1.FileName = nom
  • MMControl1.Command = "Open"
  • MMControl1.Notify = False
  • MMControl1.Wait = False
  • MMControl1.Command = "Play"
  • End Sub
  • Private Sub Stop_Click()
  • MMControl1.Notify = False
  • MMControl1.Wait = True
  • MMControl1.Command = "Stop"
  • End Sub
  • Private Sub Quitter_Click()
  • MMControl1.Notify = False
  • MMControl1.Wait = True
  • MMControl1.Command = "Close"
  • End
  • End Sub
Private Sub Dir_Change()
 File.Path = Dir.Path
 File.Pattern = "*.avi"
End Sub

Private Sub Drive_Change()
  Dir.Path = Left$(Drive.Drive, 2) + "\"
  File.Path = Dir.Path
  File.Pattern = "*.avi"
End Sub

Private Sub Form_Load()
  Dir.Path = "c:\"
  File.Path = "c:\"
  File.Pattern = "*.avi"
  MMControl1.Notify = False
  MMControl1.Wait = False
  MMControl1.Shareable = False
  MMControl1.DeviceType = "AVIVideo"
End Sub

Private Sub Jouer_Click()
  MMControl1.Command = "Close"
  If Right$(Dir.Path, 1) = "\" Then
    nom = Dir.Path + File.FileName
  Else
    nom = Dir.Path + "\" + File.FileName
  End If
  MMControl1.FileName = nom
  MMControl1.Command = "Open"
  MMControl1.Notify = False
  MMControl1.Wait = False
  MMControl1.Command = "Play"
End Sub

Private Sub Stop_Click()
  MMControl1.Notify = False
  MMControl1.Wait = True
  MMControl1.Command = "Stop"
End Sub

Private Sub Quitter_Click()
  MMControl1.Notify = False
  MMControl1.Wait = True
  MMControl1.Command = "Close"
  End
End Sub
 

 Conclusion

Voila! Si vous trouvez un bug merci de m en faire part.
Laissez moi vos commantaires.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture MORPION

 Sources de la même categorie

Source avec Zip Source avec une capture TISMEDIAPLAYER par CHETA
MIDI - (SYSEX) - ENVOIE DE MESSAGE LONG À UN CONTRÔLEUR MIDI par zbabug
Source avec Zip Source avec une capture LECTEUR ENREGISTREUR GRAVEUR par cednoir
Source avec Zip Source avec une capture LA RADIO SUR VOTRE PC par zulrigh
Source avec Zip RECONNAISSANCE VOCALE AVEC JAVA EDITION STANDARD par dietricherwane

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture Source .NET (Dotnet) CONTROL POUR UTILISER PLUS FACILEMENT FMODEX.DLL par Luciol44
Source avec Zip Source avec une capture UN PLAYER MULTI FORMAT par patosch
Source avec Zip Source avec une capture LECTEUR AUDIO AVANCÉ AVEC EFFETS ET VISUALISATIONS ATTIRANTE... par ziad1991
Source avec Zip LECTEUR VIDEO IMITANT POWERDVD par ROOTVL69
Source avec Zip Source avec une capture CREER FILM AVI VIDEO ET AUDIO STREAM par hackademius

Commentaires et avis

Commentaire de cyrilp le 15/01/2002 14:56:59

Intéressant...

Je prends, et je note... Merci et A++

Commentaire de shivan le 15/01/2002 23:24:34

simple, mais cool pour apprendre...
8/10

Commentaire de max12 le 16/01/2002 03:01:44 administrateur CS

Cool, ya pas beaucoups de code du genre

Commentaire de max12 le 16/01/2002 03:02:17 administrateur CS

J'ai déjà eu un code pour lire sans control, juste des API, le site sur lequel je l'avais pris existe plus alors sa serais pas mal de le voir

Commentaire de FScorpion le 16/01/2002 07:23:44

Très bien.

Bon travail.

Commentaire de NeoMorph le 16/01/2002 11:40:45

Merci beaucoup a tous!! ca me fait tres plaisirs!

Commentaire de Mwarff le 23/12/2002 05:54:14

oué c pas mal mais si on ve avoir le choix entre ouvrir des fchier *.avi ou *.mpg ou autre c comment qu'on fait???

Commentaire de philbar71 le 16/01/2003 18:07:33

à l'ouverture du fichier de projet vb6 me signale qu'il ne trouve pas mmdtc.dll
Comment récupérer cette dll ?

Commentaire de fourne le 02/03/2003 17:16:18

Le mmcontrol est normalement de base avec vb6.... tu peux suremment le dl sur le site de grosoft... :-)

Commentaire de virglome le 13/03/2003 09:58:42

ne passe pas

pb avec le leceteir

Commentaire de morpheus83 le 30/05/2003 23:25:36

Salut j'ai egalement essayé ce source pris sur un livre (Visual Basic 6, par :Michel Pelletier). Il ne fonctionne pas tres bien chez moi... j'ai l'image mais le son n'est là qu'au début... 10 ou 20 s.
Si tu sais comment faire pour que ça marche ... MERCI !

Commentaire de SatanCorporation le 14/06/2003 10:38:43

c'est cool ca marche avec des petits ficheirs mais avec des gros(divx l'image est accéléré et il nya a pas de sons )

Commentaire de Jayz le 18/06/2003 20:15:01

faudrait creer un buffer peut etre pour eviter le decalage son... plsu rajouter kelk instrus pour le divx

Commentaire de Programmeur1987 le 01/07/2003 22:12:43

pour trouver la dll manquante, : http://www.webzila.com/dll/ le site miracle au dll manquante !

Commentaire de radada le 01/10/2003 09:40:22

Euh....C pas mal de mettre un player avi qui est en fait un exo tout corrigé d'un bouquin de Campus press -> http://www.pearsoneducation.fr/espace/livre.asp?idEspace=73&idTheme=24&idSousTheme=67&pOuvert=0&idLivre=1476&idProvenance=67
Remarques, c vrai que tu n'a jamais dit qu'il était de toi....

Commentaire de squall83 le 04/10/2003 23:17:57

voila g télécharger un lecteur .avi mais je narive pas a le faire marcher
merci de bien vouloir me répondre .

Commentaire de Sneezys le 21/05/2005 06:58:43

Bonjour !

J'aimerais avoir plus dinformation pour savoir comment lire un avi sans trop me casser la tete! J'ai encore un peux de difficulter a comprendre!!

                                           Merci  
                                                Sneezy..

Commentaire de jaouadlaaribi le 01/11/2007 13:33:23

Pour ceux qui ont un prob avec le dll voici le lien pour le telecharger
http://www.dlldll.com/exdll/3410.html
// un lien pour le telechargement directe
http://www.dlldll.com/mmdtc.dll_download.html
si le premier fonctionne pas
Jaouad Laaribi
A+

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

AVI (Audio/Video) [ par hackademius ] salut , je vois tout dabord que tout le monde s'en fou des questions qu'on pose alors je reitaire ma question(sous une autre forme ) puisque persone n AVI(Audio/Video) [ par hackademius ] j'ai apris que AVI -> Audio / Video) - j'ai un fichier video AVI dans lequel j'ai un stream video- j'ai un fichier audio WAV dans lequel j'ai un st Renommer des fichiers audio video [ par ricomiracle ] J'aimerais pouvoir renommer des fichiers video .avi et photo .jpg Je suppose que je dois d'abord les ouvrir mais comment faire? Dim fso As New Script visioconference & videochat & streaming Audio/Video [ par wilgrass1 ] BonjourJe viens de déposer une source de visioconference sur ce site http://www.vbfrance.com/code.aspx?ID=34074 en y évoquant quelques Videochat & visioconference & streaming Audio/Video [ par wilgrass1 ] BonjourJe viens de déposer une source de visioconference sur ce site http://www.vbfrance.com/code.aspx?ID=34074 en y évoquant quelques lecteur audio [ par elmaroufy_youssef ] Salut Je veux un codes source de lecteur audio pour la plupart des format audio en visual basic Merci Lecture audio et video [ par shadow1779 ] Bonjour,je cherche comment faire en VB.NET, une lecture d'un mp3 ou autre fichier musicaux et la lecture de fichier vidéo comme les avi ou autre, Lecture d'un .avi sur le lecteur DVD [ par Lorider ] Bonjour a tous et a toutes, Je suis nouveau et pour commencer je vous souhaite (en retard) un joyeux noel.Je ne connais pas la facon de faire pour les Ou pourrais- je trouver un lecteur pour lire des vidéos avi. ?? [ par sweetgirl ] Bonjour à tous,je viens de télécharger une video qui est sous format avi. et je n'arrive pas  à la lire avec mon lecteur.Est mci et avi [ par freekc ] Lorsque j'utilise le controle mci pour lire un fichier avi qui se trouve sur un cd rom, je dois rentré un nom de fichier directement par exemple


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Septembre 2010
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
27282930   

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,920 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales