关于播放Flash的控制!(100分)

  • 主题发起人 主题发起人 coolmyf
  • 开始时间 开始时间
C

coolmyf

Unregistered / Unconfirmed
GUEST, unregistred user!
我用ShockwaveFlash来写一个播Flash的小程序
设置当窗口大小改变时,播放Flash的ShockwaveFlash
的大小也跟随着改变,但是我在实际做的时候发现在
窗口的OnResize事件中改变ShockwaveFlash的属性并不
起作用,请问这是怎么回事?怎么处理?
请高人指点!
 
Shockwavefile 放到 Paneal 设置成 alClient 调整Paneal 搞定!
 
procedure TForm1.FormResize(Sender: TObject);
begin

DoubleBuffered:=true;
ShockwaveFlash1.hide;
ShockwaveFlash1.show;
ShockwaveFlash1.SetFocus;
end;

 
QuickSilver:是很管用,但是在关闭程序时,提示非法操作:cannot focus a disabled or invisible window。我发现是
ShockwaveFlash1.SetFocus;
造成的,但是去掉它后,非得鼠标点一下画面才会充满,不知如何解决。
 
快告诉我们呀。
 
在OnResize事件中,你可以先让ShockwaveFlash失去焦点,然后在让它获得焦点
比如:
Panel.SetFocus;
ShockwaveFlash1.SetFocus;
 
procedure TForm1.FormResize(Sender: TObject);
begin

ShockwaveFlash1.DoObjectVerb(-1);
end;

 
多人接受答案了。
 
后退
顶部