就是一个Flash 的控件了,即使没有安装Flash,只要是Win98+IE5,默认就会有的。只不过名字是ShockWave Flash控件罢了。

解决方案 »

  1.   

    可以显示flash动画,真的很不错
      

  2.   

    它可以在delphi用:
    方法:如下刚刚研究出来:(哈哈)
    1.首先你必须找到以下文件 C:\Windows\System\Macromed\Flash\SWFLASH.OCX
    或者 C:\Windows\System32\Macromed\Flash\SWFLASH.OCX2.然后再delphi中安装:Component --> Import ActiveX Control
    3.这是最大的问题就是:如何使这个ocx组件,在别的程序中使用时还可以用。
    解决的方法可以这样:
    你可以在你的exe包含这个ocx的resource file。选取出需要的文件register 它
    有这样的例子:
    1.create a txt and write:
    Flash RCDATA "SWFLASH.OCX"  将它另存为以rc为后缀的文件,这里我存为:FlashOCX.rc
    注意的*.rc文件必须在和swflash.ocx在同一路径下。
    open 你的 Dos Windows and write Br32 Dir of File\FlashOcx.rc
    就是:brcc32 c:\Windows\system\FalseOcx.rc
    这样它就可以生成一个res文件:flashocx.res
    这时你就可以在程序中包含使用它了。
    {$R *.RES}
    {$R FLASHOCX.RES}代码:program Project1;uses
      Forms,comobj,
      Unit1 in 'Unit1.pas' {Form1};{$R *.RES}
    {$R FLASHOCX.RES}begin
      Application.Initialize;
     try
       Application.CreateForm(TForm1, Form1);
     except
       On EOleSysError Do
       begin
         Application.MessageBox('不能打开flash对象,你注册SWFLASH.OCX?','Open Error',0)
          //Register OCX File because not found.
       end;
     end;
      Application.Run;
    end.unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
      OleCtrls, ShockwaveFlashObjects_TLB;type
      TForm1 = class(TForm)
        ShockwaveFlash1: TShockwaveFlash;
        procedure FormActivate(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementation{$R *.DFM}procedure TForm1.FormActivate(Sender: TObject);
    begin
      ShockwaveFlash1.Movie:='e:\downloads\flashmovies\12.swf';(换成你的文件)
      ShockwaveFlash1.Zoom(200);
      ShockwaveFlash1.Play;
    end;end.试一试吧,很好玩的!
      

  3.   

    murphy(豆豆) 
    你也不推荐几个?妈的
      

  4.   

    kao!网上的OCX好用得多的是!我这有的随便拿出一两个,就够眩死你!