小弟今天测试了一下TShockwaveFlash控件,请问如果控制它的刷新问题?
这个控件我无法让它即时刷新,比如:我最大化窗体,它不会立即最大化,还得在控件上点一下才会最大化,还我还原窗体,还必须打开一个对话框,再在控件上点一下,它才会还原???请问该如何解决?

解决方案 »

  1.   

    sendmessage(shockwaveflash1.Handle,WM_LBUTTONDOWN,0,0);
    在窗体改变事件中sendmessage给控件,至于你所说的还原窗体,还要打开对话框才能够,我没有碰到啊不过我在窗体改变事件中加了这些
    with shockwaveflash1 do   
       begin
       Width:=shape1.Width-6;
       Height:=shape1.Height-6;
       Top:=shape1.Top+3;
       Left:=shape1.Left+3;
       Visible:=false;
       Enabled:=false;
       Refresh;
       Repaint;
       Enabled:=true;
       Visible:=true;
    end;
      

  2.   

    我的方法是用Setfocus()来刷新Flash1.Movie := Filename;
    Flash1.Width := FileWidth;
    Flash1.Height:= FileHeight;
    Flash1.Play();
    Flash1.SetFocus();
      

  3.   

    这样变通一下吧:
    procedure TForm1.FormResize(Sender: TObject);
    begin
    ShockwaveFlash1.Hide();
    ShockwaveFlash1.Show();
    ShockwaveFlash1.SetFocus();
    end;
      

  4.   

    http://218.56.11.178:8018/FileDown.aspx?FID=84
      

  5.   

    TO:http://218.56.11.178:8018/FileDown.aspx?FID=84我不是要这种效果,我是要窗体放大和缩小,Flash控件也跟着放大和缩小