那个FLASH控件,播放一个SWF后,然后以后的SWF就会变成第一个SWF的背景,请问怎么解决?(100分)

  • 主题发起人 主题发起人 小小小小大
  • 开始时间 开始时间

小小小小大

Unregistered / Unconfirmed
GUEST, unregistred user!
那个FLASH控件,播放一个SWF后,然后以后的SWF就会变成第一个SWF的背景,请问怎么解决?
 
把Falsh控件的父控件刷新一下,如Panel1.Invalidate
 
每次启动新的动画前,应用以下过程
destoryflash;
initlize(showpanel);
procedure tdemo.destoryflash;
var
vara:integer;
begin
for vara:=0 to self.ComponentCount-1 do
if (self.Components[vara] is tshockwaveflash) then
(self.Components[vara] as tshockwaveflash).free;
end;
procedure tdemo.initlize(vpanel: tpanel);
begin
myflash:=tshockwaveflash.create(self);
myflash.parent:=vpanel;
myflash.BGColor:='-1';
myflash.Height:=vpanel.Height;
myflash.Width:=vpanel.Width;
myflash.SetFocus;
end;
我是让控件的父为一个PANEL。道理就是这样的。
 
只要事先把 BGColor := '' 就行了。
 
后退
顶部