PureBasic

Bonjour à tous,

J'aimerais savoir si il était possible de récupérer le temps total d'une vidéo sans passer par le loadmovie qui (j'ai l'impression) demande pas mal de ressource.
Pour info j'utilise actuellement le code si dessous pour récupérer le temps.

Code : Tout sélectionner

LoadMovie(i,Files())
;         If IsMovie(i) 
;           TramePS=MovieInfo(i,0)
;           TrameTot=MovieLength(i)               
;           Duration = TrameTot/TramePS
;           Millisecs = Duration / 10000   
;           Hours = (Duration / 3600)
;           Minutes = (Duration / 60) - (60 * Hours)
;           Seconds = Duration - (60 * (Duration / 60))
;           Hours$ = Str(Hours) : Minutes$ = Str(Minutes) : Seconds$ = Str(Seconds)
;           If Seconds < 10 : Seconds$ = "0" + Seconds$ : EndIf
;           If Minutes < 10 : Minutes$ = "0" + Minutes$ : EndIf
;           If Hours   < 10 : Hours$   = "0" + Hours$   : EndIf
;           duree$=Hours$ + ":" + Minutes$  
; FreeMovie(i)

Merci d'avance pour vos réponse

Je n'ai pas la réponse à ta question. Par contre tu peux remplacer ça :

Code : Tout sélectionner

Hours$ = Str(Hours) : Minutes$ = Str(Minutes) : Seconds$ = Str(Seconds)
If Seconds < 10 : Seconds$ = "0" + Seconds$ : EndIf
If Minutes < 10 : Minutes$ = "0" + Minutes$ : EndIf
If Hours   < 10 : Hours$   = "0" + Hours$   : EndIf

Par ça :

Code : Tout sélectionner

Hours$    = RSet(Str(Hours),2,"0")
Minutes$  = RSet(Str(Minutes),2,"0")
Seconds$  = RSet(Str(Seconds),2,"0")

D'accord ça ne fait pas avancer le schmilblick...mais c'est toujours bon à savoir

En faisant une petite recherche, j'ai trouvé ça :
viewtopic.php?f=1&t=13840&view=next

et ça
http://www.purebasic.fr/french/viewtopi ... &view=next

M.

PureBasic

Connaitre la longueur d'une video sans loadmovie

Connaitre la longueur d'une video sans loadmovie

Re: Connaitre la longueur d'une video sans loadmovie

Re: Connaitre la longueur d'une video sans loadmovie