Hallo,
ich habe unter Delphi 10.3.3 einen Videoplayer programmiert. Da ich ihn zum video schneiden nutze, ist wichtig, dass man Positionen im Video manuell ansteuern kann (also mit einer Trackbar).
Das hab ich so gemacht, dass ich eine TActionlist auf der Form hatte und dann bei der Trackbar als Standard Aktion gewählt habe: MediaPlayerCurrentTime1.
Das hatte zur folge:
Erstens: Bei Mediaplayer1.Play hat sich die Trackbar automatisch bewegt.
Zweitens: Wenn man das Video gestoppt hat und die Trackbar-Position manuell verändert hat, konnte man sozusagen im Video navigieren
Nach dem update auf Delphi 10.4 funktioniert das zweite nicht mehr. Wenn man die Position der Trackbar verändert, ändert sich das aktuelle videobild nicht. Man bräuchte nach jedem Trackbar.change-event sowas wie ein Mediaplayer1.Refresh, nur gibts das leider nicht. Wenn man mit jedem Trackbar.change-event ein
Delphi-Quellcode:
Medialayer1.Play;
Medialayer1.Sop;
auslöst, funktioniert es zwar, nur wird das dann extrem schwerfällig. Ein schnelles Navigieren geht so nicht.
Hat jemand eine Idee, wie man das eleganter machen könnte?