CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

begin process at 2010 02 10 11:53:14

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil > Forum >

tester si un fichier est une video flv

Poser une question dans le forum ou lancer une discussion

tester si un fichier est une video flv

samedi 19 avril 2008 à 13:28:07 | tester si un fichier est une video flv

benus

8 msg

19 msg CS

bonjour,
connaissez-vous une librairie ou une astuce qui permet de tester si l'en-tete d'un fichier est bien au format flv (le format video de flash)?

samedi 19 avril 2008 à 23:16:21 | Re : tester si un fichier est une video flv

cantador

2951 msg

3105 msg CS

Tu crées un objet TShockwaveFlash et tu lances un Play
en encapsulant tes écritures par un Try Except..
C'est pas top mais faute de grives..

cantador

dimanche 20 avril 2008 à 00:24:10 | Re : tester si un fichier est une video flv

cirec

2491 msg

2563 msg CS

il y a du merle au menu

sinon tu check les 3 premiers octets (caractères) du fichier ... et si c'est "FLV" ...
je te laisse deviner

@+
Cirec

dimanche 20 avril 2008 à 00:43:09 | Re : tester si un fichier est une video flv

cirec

2491 msg

2563 msg CS

Réponse acceptée !
Voici un petit exemple :

Const FLVSignature = $1564C46;

Procedure TForm1.Button1Click(Sender: TObject);
Var MS : TMemoryStream;
    Sign : Longint;
Begin
  With TMemoryStream.Create Do
  Try
    LoadFromFile('test.flv');
    ReadBuffer(Sign, SizeOf(Sign));
    If Sign = FLVSignature Then ShowMessage('Fichier Flash');
Finally
    Free;
  End;
End;

@+
Cirec

dimanche 20 avril 2008 à 11:24:49 | Re : tester si un fichier est une video flv

cantador

2951 msg

3105 msg CS

hé cirec, c'est bon le merle !

trop fort..

cantador

dimanche 20 avril 2008 à 15:53:35 | Re : tester si un fichier est une video flv

benus

8 msg

19 msg CS

merci ce code me parrait assez optimisé mais au lieu de faire un loadfile, n'est-il pas possible de lire uniquement les 3 premiers octets du fichier?

dimanche 20 avril 2008 à 16:58:42 | Re : tester si un fichier est une video flv

cirec

2491 msg

2563 msg CS

ben comment veux tu lire une partie d'un fichier sans le loader

@+
Cirec

dimanche 20 avril 2008 à 17:00:41 | Re : tester si un fichier est une video flv

benus

8 msg

19 msg CS

c'etait justement ma question, est-t-il possible de loader uniquement les 3 premiers octets?

dimanche 20 avril 2008 à 17:44:04 | Re : tester si un fichier est une video flv

cirec

2491 msg

2563 msg CS

ben c'est ce que je fais ... le fichier est ouvert et je lis les premier caractères et pas plus, puis le fichier est refermé ... on ne peut pas faire moins

ps : dans l'exemple donné je lis les 4 premiers et non les 3 premiers

@+
Cirec

dimanche 20 avril 2008 à 19:25:57 | Re : tester si un fichier est une video flv

f0xi

2572 msg

3614 msg CS

function IsFlashVideoFile(const FileName: string): boolean;
var Sign : LongWord;
const FLVSignature = $01564C46;
begin
Result := false;
if not FileExists(FileName) then
    Exit;
with TFileStream.Create(FileName, fmOpenRead) Do
try
    ReadBuffer(Sign, 4);
    Result := Sign = FLVSignature;
finally
    Free;
end;
end;

Cette discussion est classée dans : fichier, tester, format, video, flv

Répondre à ce message

Sujets en rapport avec ce message

NMFTP, date modification fichier [ par usmok ] est ce que kk1 sait comment récupérer la date de derniere modification d'un fichier gra^ce à un TNMFTPpour l'instant ,jy parviens en utilisant NMFTP.L NMTFP date modification fichier [ par usmok ] est ce que kk1 sait comment récupérer la date de derniere modification d'un fichier gra^ce à un TNMFTPpour l'instant ,jy parviens en utilisant NMFTP.L NMTFP date modification fichier [ par usmok ] est ce que kk1 sait comment récupérer la date de derniere modification d'un fichier gra^ce à un TNMFTPpour l'instant ,jy parviens en utilisant NMFTP.L Tester si un fichier est deja ouvert. [ par magicvinni ] Bonjour, Existe il une procedure pour savoir si un fichier F:TextFile est deja ouvert avec append:Procedure OUvreAssignFile(f,....)Append(f);Procedure lecture des entetes de fichier video mpeg :-( :-( :-( [ par fcr_loch ] Salut tout le monde...bon j'ai un gros souci, en faite j'arrive pas a trouvé une ptite source ou explication compréhensible par le simple mortel que j RICHEDIT sauvegarde format text seulement [ par yvessimon ] en utilisant RichEdit1.Lines.SaveToFile('fichier.txt')alors dans fichier.txt il y a d'autres informations telque :{\rtf1\ansi\ansicpg1252\deff0\d fichier format cur [ par adec0127 ] salut Je sursis entrain de faire une application pour dessiner des curseursLe problème et comment les enregistre au extensions *.curJe voudrais savoir creation de fichier video a partir de jpeg sous delphi6 [ par deschamp ] sous delphi6 je cree de 10 a 1000 fichiers jpeg, pour une representation sous powerpoint, je veux regrouper ces fichiers jpeg sous delphi6 en une anim Tester si un fichier est exécutable & extraire ses paramètres [ par maxabbey ] Bonjour à tous,Je bute depuis quelques heures sur un problème.J'aimerais pouvoir tester si un fichier est un fichier exécutable ou non.J'ai bien trouv active X pour lecteur FLV [ par benus ] salut,quelqu'un a-t-il entendu parlé d'un activex pour lire le format FLV (le format video de flash)?

Livres en rapport

MS-DOS

Acrobat 4 pour PC et Macintosh

XML in a nutshell

MPEG-2

Tous les livres pour Fichier, Tester, Format, Video, Flv

Nos sponsors

Derniers Blogs

UNE JOLIE-HORLOGE ET PAS QU'UN PEU ! par neodante

TECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICES par ROMELARD Fabrice

[DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE par orion

TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010 par ROMELARD Fabrice

TECHDAYS PARIS 2010 : DéPLOIEMENT DE NOUVELLES TECHNOLOGIES - RETOUR D'EXPéRIENCE PAR L'INFORMATIQUE DE MICROSOFT par ROMELARD Fabrice

Forum

RE : DéSACTIVER UN BOUTON D'UNE APPLICATION EXTéRIEURE par nabil351974

RE : SAVEDIALOG par JulioDelphi

RE : SAVEDIALOG par zeydounnounou

RE : SAVEDIALOG par JulioDelphi

SAVEDIALOG par zeydounnounou

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

module flash de personalisation
Budget : 600€
PLATEFORME SUR L ESOTERISME VOYANCE - sans charte graphique
Budget : 3 500€
Joomla 15 module paiement adaptation composant cuisine
Budget : 250€

Logiciels

DB-MAIN (9.1.0)
DB-MAIN (9.1.0)

DB-MAIN is a data-modeling and data-architecture tool. It is designed to help developers and anal...

Cliquez pour télécharger DB-MAIN
Xilisoft DPG Convertisseur (5.1.37.0120)
XILISOFT DPG CONVERTISSEUR (5.1.37.0120)

Xilisoft DPG Convertisseur offre aux fans de Nintendo DS une bonne solution leur permettant de dé...

Cliquez pour télécharger Xilisoft DPG Convertisseur
GraphicsGale (2.01.01)
GRAPHICSGALE (2.01.01)

GraphicsGale est un logiciel de PixelArt avec de nombreuse fonctionnalités permettant de réalisé ...

Cliquez pour télécharger GraphicsGale
Architecte 3D (Platinum 2010)
ARCHITECTE 3D (PLATINUM 2010)

Architecte 3D Platinium vous permet de concevoir facilement les plans votre future maison, de l'é...

Cliquez pour télécharger Architecte 3D
TeamViewer 5 (TeamViewer 5)
TEAMVIEWER 5 (TEAMVIEWER 5)

Dépanner un ami,expliquer une manipulation devient un jeu d'enfant. Prise en main d'un autre ord...

Cliquez pour télécharger TeamViewer 5