Fehler beim Abspielen von Video

[KeyBe]

ok, ich bins mal wieder^^
ich hab jetzt mal wieder langeweile gehabt und versucht das mit der avi-file in den griff zu kriegen, ich habs gott sei dank geschafft die file abgespiel zu bekommen.
nur leider läuft die file zu schnell, ton kommt demzufolge natürlich auch keiner. ich habe daraufhin versucht die größe des panels der größe der file anzupassen, das klappt soweit, nur ändert sich an der geschwindigkeit des videos nichts.

das wäre der code dazu:

Delphi-Quellcode:

procedure groessedisplay(mediaplayer: Tmediaplayer);
begin
with mediaplayer do
begin
Display.Width:= DisplayRect.Right - DisplayRect.Left;
Display.Height:= DisplayRect.Bottom - DisplayRect.Top;
end;
end;

procedure TForm1.SpeedButton2Click(Sender: TObject);
var src : string;
begin
opendialog1.Execute;
edit1.text:=OpenDialog1.Filename;
src:=edit1.text;
with MediaPlayer1 do
begin
Filename:=src;
open;
Display:=Panel1;
groessedisplay(mediaplayer1);
end;
end;

vllt bin ich auch einfach nur blind

(autoopen geht nicht auf true zu setzen, hat damit wahrscheinlich eher weniger zu tun, wollte es aber anmerken)



vielen dank im voraus!