I'm having trouble proportionally scaling a Quicktime control to the
user's full-screen window. The movie keeps looking stretched out.
Can someone please set my code straight?
ratio = double
w = the window with the player on it
mPlayer = the player
ratio = w.mPlayer.Width / w.mPlayer.Height
if w.mPlayer.width > w.mPlayer.height then
w.mPlayer.Width = w.Width
w.mPlayer.Height = w.mPlayer.Height * (ratio + 1)
else
w.mPlayer.Height = w.Height
w.mPlayer.Width = w.mPlayer.Width * (ratio + 1)
end if
Thanks,
Christian
Pariahware, Inc. Custom Software
<[EMAIL PROTECTED]>
<http://www.pariahware.com>
--
God loved you so much that He gave His only son Jesus. What have you
done with God's gift?
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
