http://www.herosh.com/download/7510423/test.flash.rar.html
ShockwaveFlash1.Movie:=ExtractFilePath(Paramstr(0))+'data\1.swf';; ShockwaveFlash1.Play;