Lire des avi trés simple

Soyez le premier à donner votre avis sur cette source.

Vue 6 973 fois - Téléchargée 563 fois

Description

Suite à une question dans le forum, je mets ici un petit exemple très simple de lecture de fichier AVI. Le controle utilisé est Animation que l'on trouve dans les composants Microsoft windows common control 2-6. Il ne lit que les avi muette et non compressées ( comme les animations de windows quand on vide la corbeille par exemple. Celles-ci sont fournies avec VB et on les trouvent ici : C:\Program Files\Microsoft Visual Studio\Common\Graphics\Videos ( enfin suivant votre installation )

Source / Exemple :


Private Sub Command1_Click()
'appel la fenetre d'ouverture d'un fichier
CommonDialog1.ShowOpen
'Mets un dossier par défaut, sinon Mes Documents
CommonDialog1.InitDir = "C:\Program Files\Microsoft Visual Studio\Common\Graphics\Videos"
'Propose d'afficher seulement les fichier *.avi
CommonDialog1.Filter = "(Fichiers AVI)|*.avi"
'test si il y a bien eu un fichier de sélectionné et le gharge dans le control animation
   If CommonDialog1.FileName <> "" Then
        Animation1.Open CommonDialog1.FileName
        Animation1.Enabled = True
    Else
        'pas de fichier avi chargé
        Animation1.Enabled = False
    End If
End Sub

Private Sub Command2_Click()
'lance la lecture
    If Animation1.Enabled = True Then Animation1.Play
End Sub

Private Sub Command3_Click()
'arrete la lecture
    If Animation1.Enabled = True Then Animation1.Stop
End Sub
' sans oublier de mettre un control animation et common dialog bien sur...

Conclusion :


Heu c'est mon premier source et c'est juste histoire dans faire profiter les autres et pas les envoyer à une seule personne...

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
21
Date d'inscription
dimanche 21 juillet 2002
Statut
Membre
Dernière intervention
20 mars 2003

original mai pour l'autres (ocx) il y a un moyen de le mettre en pleine ecrant ?
je ne croit pas ?
Messages postés
415
Date d'inscription
mardi 3 avril 2001
Statut
Membre
Dernière intervention
26 avril 2008

Sa lag un peu... et me dites pas que c'est mon ordi!
AMD Athlon 2000+
Carte 3D ATI Radeon
Messages postés
415
Date d'inscription
mardi 3 avril 2001
Statut
Membre
Dernière intervention
26 avril 2008

Windows Media Player (l'ocx) lit bcp plus de fichiers... ak le son et tout!
mais c bien quand même, si on veut faire + "pro" et ne pas avoir le logo ou le menu de media player (quoi qu'il s'enlève mais c + compliqué!)

Je met une bonne note pour encourager ceux qui mette des NOUVELLES sources au lieu de reprendre les vieilles, modifier quelques trucs et les remetree!

VBFrance est rendu un de Générateur de MSGbox, de MailBomber et d'envoie de SMS

... :)

8/10

Nox

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.