Weiteres Herumbasteln hat dazu geführt, dass ich erkenne musste, dass Windows den Treiber des gewünschten Videos nicht kennt (habe das Video aber mit einem am System installierten Videoprogramm hergestellt).
Danach habe ich ein Video als Quelle angegeben, das von Windows mitgeliefert wird (Wildlife.wmv).
Nunmehr läuft das Video. Aber leider in der nativen Größe und lässt sich auch durch diverse Tricks wie
Delphi-Quellcode:
panel1.Width:=640;
panel1.Height:=480;
mediaplayer1.Parent:=panel1;
mediaplayer1.DisplayRect:=Rect(0, 0, 640,480);
mediaplayer1.Display:=panel1;
nicht austricksen.
Ich bin begeistert von Delphi Tokyo Starter Edition. NOT.
(Ich hatte das alles schon in Delphi 7SE programmiert und dort lief es problemlos....)