[gelöst] Mediafiles (audio|video) erkennen ?

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
scholly
Beiträge: 793
Registriert: 04.11.2005 21:30
Wohnort: Düsseldorf

[gelöst] Mediafiles (audio|video) erkennen ?

Beitrag von scholly »

moin, moin...

Ich hab mir per rekursivem Directory-Scan eine Liste von Files erstellt und möchte nun File für File verläßlich prüfen, ob es sich um ein Video- oder Audio-File handelt.
Wie mach ich das am geschicktesten/kürzesten ?
Gibts ne PB- /WinAPI-Funktion, die ich nicht erkannt habe ?

tia......
scholly
Zuletzt geändert von scholly am 17.05.2008 17:01, insgesamt 1-mal geändert.
Ich bin blutiger PB-Anfänger.
seit 17.12.08: PB 4.3 unter XP Home(SP3)
Benutzeravatar
AND51
Beiträge: 5220
Registriert: 01.10.2005 13:15

Beitrag von AND51 »

Video-Plaer (z. B. Media Player) können auch Musikdateien öffnen, umgekehrt kann z. B. WinAmp auch Videodateien wiedergeben.

Wenn du dich nicht nur auf die Dateiendung verlassen möchtest, prüfe erst, ob sich die vermeintliche Video-/Sounddatei mit LoadSound() öffnen lässt. Wenn ja ist es eine reine Audiodatei, andernfalls öffne sie mit LoadMovie(). Sagt LoadMovie() "ja", dann ist es entweder ein Movie oder auch eine Audiodatei, die abgespielt werden kann (Movie - Lib unterstützt mehr Dateiformate als Sound - Lib).

Das wäre die eheste Idee, die mir einfällt. Ansonsten hätte ich noch eine Idee: Versuche dein Glück mit fmod oder mci.
PB 4.30

Code: Alles auswählen

Macro Happy
 ;-)
EndMacro

Happy End
Benutzeravatar
scholly
Beiträge: 793
Registriert: 04.11.2005 21:30
Wohnort: Düsseldorf

Beitrag von scholly »

Da LoadSound anscheinend z.B. kein MP3 erkennt, hab ich ausschließlich mit movies gemacht:

Code: Alles auswählen

Mediafile.s = OpenFileRequester ( "Select Mediafile", "d:\4tests", "Mediafile|*.*", 0 )

InitMovie()
If LoadMovie(1,Mediafile)
  Debug "isn mediafile"
  If MovieInfo(1, 0) > 0
    Debug  "isn video"
  Else
    Debug  "isn audio"
  EndIf
  FreeMovie(1)
Else
  Debug  "is keins"
EndIf
End
Danke für den Schubs...
scholly
Ich bin blutiger PB-Anfänger.
seit 17.12.08: PB 4.3 unter XP Home(SP3)
Antworten