Ausgehend von bestimmter Datei nächste abspielen

[Ringo Rabbit]

Hi, ich benötige dringend Hilfe. Ich habe einen VideoPlayer der auch schon recht gut funktioniert, aber zur Zeit will ich eine Funktion einbauen bei der ich einfach nicht weiterkomme...

Ausgangssituation: Ich habe in irgendeinem Verzeichnis eine Datei mit meinen Player gestartet. Nach Abspielende soll der Player automatisch die nächste Videodatei abspielen die im Verzeichnis liegt (sofern es ein Videoformat ist), so
dass der Player (wenn man ihn nicht unterbricht) angefangen bei dem manuell gestarteten File das ganze Verzeichnis immer wieder durchlaufen würde.

Wichtig ist mir dabei der Ausgangspunkt <<irgendwo>>, d.h. wenn ich "Teil_1.avi" manuell gestartet hatte, müsste als Ergebnis "Teil_2.avi" folgen.

Ich habs mit API-Funktionen "FindFirst/FindNext/FindClose" probiert, aber irgendwie wills mir nicht gelingen. Hat jemand eine gute Idee?

Mit bestem Dank im Voraus, RR

 

[Shakie]

Du könntest doch irgendwo eine unsichtbare FileListBox einbauen und diese dann auf das entsprechende Verzeichnis setzen. Da die FileListBox alle Dateien in alphabetischer Reihenfolge auflistet, brauchst du blos die nächste Datei in der Liste nach "Teil_1.avi" suchen und abspielen bzw. noch prüfen, ob es eine Videodatei ist.

 

[Ringo Rabbit]

Shakie, vielen Dank erstmal.
Das wäre ja wieder so eine klassische VB-Trickserei ;-) und wenns nicht anders geht werd ich das so versuchen. Ich wär aber schon an einer "amtlichen" Herangehensweise an dieses Problem interessiert, falls es eine gibt.

 

[Retlaw]

Einfach mit

Dim nextFile as String
nextFile = Dir("*.avi")

alle Avi-Dateien in einem Verzeichnis durchlaufen,
einmal den Filter gesetzt liefert dir

nextFile = Dir()

die jeweils nächste gefundene Datei.
Wenn du die Datei gefunden hast die du grad abspielst einfach noch eins weiterschalten und die dann abspielen.