N nakoka Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-16 #1 我想让MEDIAPLAYER1播放到panle1,并且充满panle1,现在虽然能播放VCD,可是图象总是不能充满panle1怎么办?我不想让它总是默认大小播放。 如何让它充满那个panle进行播放呢?谢了!
我想让MEDIAPLAYER1播放到panle1,并且充满panle1,现在虽然能播放VCD,可是图象总是不能充满panle1怎么办?我不想让它总是默认大小播放。 如何让它充满那个panle进行播放呢?谢了!
Y yhaochuan Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-16 #3 试试 BevelInner属性为bvNone BevelOuter属性为bvNone
J jingtao Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-16 #5 MediaPlayer1.DisplayRect := Form2.Panel1.ClientRect;//指定播放窗口大小 procedure TForm2.Panel1Resize(Sender: TObject); begin Form1.MediaPlayer1.DisplayRect := Panel1.ClientRect;//当窗口改变大小的时候仍然保持不变 end;
MediaPlayer1.DisplayRect := Form2.Panel1.ClientRect;//指定播放窗口大小 procedure TForm2.Panel1Resize(Sender: TObject); begin Form1.MediaPlayer1.DisplayRect := Panel1.ClientRect;//当窗口改变大小的时候仍然保持不变 end;
D D影子D Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-22 #7 []设置panel1在form1,form1.windowstate为wsmaximized;将panel1充满整个form. 记住borderstyle为none;完!
电 电猛LimIt Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-07 #9 Form1.MediaPlayer1.DisplayRect := Panel1.ClientRect