progressbar avec une musiqueRésolu

Question

cedric

bonjour j'aimerai savoir comment on fait pour faire avancer un progressbar en fonction de la musique
ex: debut musique, progress bar a 0
      fin de musique,progress bar a 100
je vous remercie!!!!!! :)

jmp77 · Accepted Answer

Et bien simplement si tu connais la durée de ta musique tu testes à quelle moment elle en est et au fur a mesure tu fais avancer ta progress bar.

Par exemple ta chanson fais 1 min :
ProgressBar.min := 0;
Progressbar.Max := 60;

Ensuite tu testes à combien ta musique en est et a chaque seconde tu fais un progressbar.stepUp je crois ou StepIt.

Sinon tu peux lancer un timer en meme temps que ta musique et sur l'évenement ontime du timer tu fais avancer ta progressbar.
 
Bonne prog,
JMP77.

N'oubliez pas de cliquer sur réponse acceptée.

ni69 · Answer

Si tu utilises le compo MediaPlayer, tu peux faire comme ceci :

Pose un timer sur ta form, de fréquence rapide de préférence et mets ce code :
procedure TForm1.FormCreate(Sender: TObject);
begin
//Remarque: Il faut que le contenu du MediaPlayer soit déjà chargé pour exécuter ce code
ProgressBar1.Max := MediaPlayer1.Length;
ProgressBar1.Min := 0;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
ProgressBar1.Position := MediaPlayer1.Position;
end;

@+
Bonne Prog'
Nico

N'oubliez pas de cliquer sur Réponse acceptée lorsque la réponse vous convient !  :)

ced55957 · Answer

oki merci pour le code!!! &#231;a marche nickel!!!! mais y'a t'il un moyen pour que &#231;a fonctionne sans que le contenu soie charger??

ni69 · Answer

Non, car par d&#233;finition, il faut que le contenu soit charg&#233; pour en conna&#238;tre la longueur 

 @+
 Nico  { http://www.ni69.new.fr/ }
 
 <hr size="2" width="100%"> 
N'oubliez pas de cliquer sur R&#233;ponse Accept&#233;e lorsque la r&#233;ponse vous convient !

ni69 · Answer

Et puis aussi, pourquoi voudrais-tu faire avancer ta ProgressBar alors que rien n'est jou&#233; ?  Il y a quelque-chose que je ne comprends pas...

 @+
 Nico  { http://www.ni69.new.fr/ }
 
 <hr size="2" width="100%"> 
N'oubliez pas de cliquer sur R&#233;ponse Accept&#233;e lorsque la r&#233;ponse vous convient !

Progressbar avec une musique

5 réponses

Votre réponse

Discussions similaires