Hallo Delphianer,
für meinen Mediaplayer habe ich sone mitlaufende Leiste geprogt (so ein ding wo man sieht wie lang das Lied noch läuft).
In einen Timer hab ich das geschrieben (Invertal: 1)
Delphi-Quelltext
1: 2:
| Gauge1.maxvalue:= Mediaplayer1.lenth; Gauge1.progress:= Mediaplayer1.position; |
Über Gauge1 habe ich eine Paintbox gelegt.
Mausdown ereignis:
Delphi-Quelltext
1: 2:
| gauge1.Progress := round((100/paintbox1.Width)*x); Mediaplayer1.position:= Gauge1.progress; |
Also Lied fängt an, Gauge1 bewegt sich normal(Timer), drück ich jetzt irgendwo auf das Gauge(eigendlich ja Paintbox), ist der Progress von Gauge1 nicht zu sehen und das Lied stopt. Drückt man Play geht das Lied von vorne los. Dabei soll Lied aber an die Stelle springen wo man hingeklickt hat.
Hoffe ihr wisst was ich meine. Ein Problem zu haben ist halt einfacher als eins zu beschreiben.
mfg Apollo
Ach ja bevor ich's noch vergess, der Trick mit der Paintbox kommt von Tilman
---
Moderiert von
Narses: Überflüssige Zeilenumbrüche entfernt---