Hi,
die Länge des aktuellen Stücks kannst du mit
mediaplayer1.lengthauslesen. Das Ergebnis ist in ms, muss also evtl. noch umgewandelt werden. Auf Minuten und Sekunden kommst du so:
Delphi-Quelltext
1: 2: 3:
| zeit:=mediaplayer1.length div 1000; minuten:=zeit div 60; sekunden:=zeit mod 60; |
Um jetzt immer die aktuelle Position anzeigen zu lassen holst du einen Timer mit dem Intervall 1000 ms (oder kleiner, je nachdem wie genau es sein soll) und list mediaplayer1.position aus. Ist genauso eine Zeitangabe in ms wie die Länge.
Zeit runterlaufen lassen (wie bei nem Countdown) geht dann so:
restzeit:=mediaplayer1.length - mediaplayer1.position;
Ob man mit dem Mediaplayer auch rückwärts abspielen kann weiß ich nicht ...
mfG v!sum