Full Screen در TMediaPlayer [بایگانی]

Mahmood_M

شنبه 06 آبان 1385, 00:37 صبح

سلام
چه طور می شه Media Player رو Full Screen کرد ؟
با این دستور توی یه فرم جدا نشونش می دم :
Mediaplayer1.Display:= Nil;
حالا چه طور می شه این فرم جدایی که نشون داده میشه رو تمام صفحه کرد ؟
با تشکر ...

vcldeveloper

شنبه 06 آبان 1385, 11:13 صبح

از یه فرم دیگه برای نمایش تصویر استفاده کن (روی فرم دوم یک panel بزار و خاصیت Display را روی نام همون Panel تنظیم کن: MediaPlayer1.Display := Form2.Panel1 ). هر زمان که روی فرم دابل کلیک میشه، خاصیت WindowState فرم را به wsMaximized و خاصیت BorderStyle را به bsNone تغییر بده تا فرم Full Screen بشه. خاصیت DisplayRect از MediaPlayer را هم در رویداد OnResize فرم تغییر بده تا متناسب با تغییر اندازه فرم، کادر نمایش فیلم هم تغییر اندازه بده.