X xq0705 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-04 #1 我在一个Form中放了一个Flash ActiveX控件,但却不能随Form最大、最小化;Why?
T tycoonsl Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-04 #2 在form的onResize事件中设置该控件的top,left和height,width,使之与form的变化同步
X xq0705 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-05 #3 tycoonsl: 谢谢您,我用Delphi6在Flash ActiveX控件的Align属性设置为alClient,大小是同步了, 但播放显示区域却不会变,为什么?
T tycoonsl Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-05 #5 可以指定显示区域的DisplayRect为Rect(0,0,Form.Width,Form.Height) 就OK!
飞 飞扬的花瓣 Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-23 #6 form1.windowstate:=wsmaximized; flash1.Align :=alclient; trackbar1.SetFocus flash1.SetFocus form1.windowstate:=wsminimized;
form1.windowstate:=wsmaximized; flash1.Align :=alclient; trackbar1.SetFocus flash1.SetFocus form1.windowstate:=wsminimized;
G gg3166 Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-23 #7 MoveWindow(shockwave1.handle,0,0,1024,768) 在onsize时候。
L laoli Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-23 #8 在form的onResize事件中 先使其他控件获得焦点 再使flash控件获得焦点 如: procedure TForm2.FormResize(Sender: TObject); begin //------------------------------------ ///--------切换控件焦点,达到缩放的效果 Panel1.SetFocus; shockwaveflash1.SetFocus; /////-----------------------------------; end;
在form的onResize事件中 先使其他控件获得焦点 再使flash控件获得焦点 如: procedure TForm2.FormResize(Sender: TObject); begin //------------------------------------ ///--------切换控件焦点,达到缩放的效果 Panel1.SetFocus; shockwaveflash1.SetFocus; /////-----------------------------------; end;