Delphi的Copmponent菜单中选择Import ActiveX Control~~~
找到Shockwave  Flash然后Install就可以了~~

解决方案 »

  1.   

    安装shockwave控件就可以了,和普通activex控件使用方法相同 
      

  2.   

    控件面板的ActiveX上就会有TShockwaveFlash控件~~
      

  3.   

    通过Delphi的Copmponent菜单中选择Import ActiveX Control将其加入,然后就可以象IMAGE
    控件一样用了!
      

  4.   

    你浏览一个flash动画之后就有了,它是windows自带的啊 procedure tfrmmain.pro_ShowFlash(strFlashName: String; bolLoop: Boolean);
    //strFlashName:Flash名称; bolLoop:是否循环播放
    begin
      with showflash  do    //shockwave控件名
            begin
                Movie:=ExtractFilePath(Application.ExeName)+strflashname+'.swf';
                Loop:=bolLoop;
                Play;
            end;
            end;
      

  5.   

    但它没有FILENAME属性,那怎么用,烦大哥指教
      

  6.   

    procedure pro_ShowFlash(strFlashName: String; bolLoop: Boolean);  
    //strFlashName:Flash名称; bolLoop:是否循环播放
    begin
        with FlashStage do    //shockwave控件名
            begin
                Movie:=ExtractFilePath(Application.ExeName)+strFlashName+'.swf';
                Loop:=bolLoop;
                Play;
            end;
    end;