W Wrong Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-23 #1 我在form中使用了一个Twindowsmediaplayer，设置了Align为alClient，但启动时大小是合适的，但再将form缩放，则仍只有启动时的大小，不知如何让它和form一起缩放呀？
W Wrong Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-23 #2 我在form中使用了一个Twindowsmediaplayer，设置了Align为alClient，但启动时大小是合适的，但再将form缩放，则仍只有启动时的大小，不知如何让它和form一起缩放呀？
天 天籁之音 Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-23 #3 procedure TForm1.FormResize(Sender: TObject); begin// 在这个事件里面写 //MediaPlayer1.DisplayRect := BoundsRect; //MediaPlayer1.Refresh; Repaint; Refresh; end;
procedure TForm1.FormResize(Sender: TObject); begin// 在这个事件里面写 //MediaPlayer1.DisplayRect := BoundsRect; //MediaPlayer1.Refresh; Repaint; Refresh; end;
W Wrong Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-23 #4 天籁之音 不行呀，我早已经试过了，还是不变。不过我设置了在form的caption中显示width值，是变化的，但mediaplayer并没有变。
E e- Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-23 #5 Form1.ActiveControl := nil; Form1.ActiveControl := windowsmediaplayer;
