Mediaplayer Fullscreen

[Weazy]

Hallo erstmal!

Ich habe mit einem Mediaplayer ein 800x600 grosses DivX Video mit dem Mediaplayer mit folgender funktion im Fullscreen-modus wiedergegeben:


procedure playvideo(avi:string);
begin
mciSendString(PChar('open "'+avi+'.avi" alias film'), nil, 0, 0);
mciSendString('window film handle 0', nil, 0, 0);
mciSendString('play film fullscreen notify', nil, 0, Form1.Handle);
end;


Das Problem ist nur dass das Video auf den 1280x1024 Bildschirm vergrösert werden soll und nich stocken soll!