• Aide à la navigation du site
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • RSS CodeS-SourceS
  • Delphi CodeS-SourceS
begin process at 2008 05 16 04:35:42
1 173 215 membres
57 nouveaux aujourd'hui
13 970 membres club
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : tester si un fichier est une video flv [ Système / Fichier & Disque ] (benus)

tester si un fichier est une video flv le 19/04/2008 13:28:07

benus
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)?
Re : tester si un fichier est une video flv le 19/04/2008 23:16:21

cantador
Membre Club

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
Re : tester si un fichier est une video flv le 20/04/2008 00:24:10

cirec
Membre Club
(Admin 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
Re : tester si un fichier est une video flv le 20/04/2008 00:43:09

cirec
Membre Club
(Admin 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
Re : tester si un fichier est une video flv le 20/04/2008 11:24:49

cantador
Membre Club
hé cirec, c'est bon le merle !
trop fort..

cantador
Re : tester si un fichier est une video flv le 20/04/2008 15:53:35

benus
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?
Re : tester si un fichier est une video flv le 20/04/2008 16:58:42

cirec
Membre Club
(Admin CS)
ben comment veux tu lire une partie d'un fichier sans le loader

 
@+
Cirec
Re : tester si un fichier est une video flv le 20/04/2008 17:00:41

benus
c'etait justement ma question, est-t-il possible de loader uniquement les 3 premiers octets?
Re : tester si un fichier est une video flv le 20/04/2008 17:44:04

cirec
Membre Club
(Admin 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
Re : tester si un fichier est une video flv le 20/04/2008 19:25:57

f0xi
Membre Club
(Admin 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;





[Page 1 Page 2]
 Classé sous : fichier, tester, format, video, flv

Participer à cet échange

Appels d'offres

script extraxction de ...
Budget : 100€
Portage appli Linux su...
Budget : ND
Script verification st...
Budget : 200€

Pub



CalendriCode

Mai 2008
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS
Nos partenaires et amis ;-)
forum informatique Colocation dans toute la France C2i.fr Feed247,com Toute l'actu Internet 24h/24 7J/7 Dotnet-News.com ASP MAGAZINE


Dev réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND, Bidou, Nurgle
Base de données maintenue par Christian, Design réalisé par Guillaume, Mascotte réalisée par N.SOREL (Nix) & KDO-Comception
DelphiFR.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
Hébergement de Serveur dédié - Téléphonie VOIP - Comparer les prix - Envoyer des ecards gratuit - Icones
Temps d'éxécution de la page : 0,8594-4sec
Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.