NAME
Wx::ActiveX::Flash - ActiveX interface for Shockwave Flash.
SYNOPSIS
use Wx::ActiveX::Flash ;
my $flash = Wx::ActiveX::Flash->new( $parent , -1 , wxDefaultPosition , wxDefaultSize );
$flash->LoadMovie(0,"file:///F:/swf/test.swf") ;
$flash->Play ;
EVT_ACTIVEX($this, $flash ,"FSCommand", sub{
my ( $this , $evt ) = @_ ;
my $cmd = $evt->{command} ;
my $args = $evt->{args} ;
...
}) ;
DESCRIPTION
ActiveX control for Shockwave Flash. The control comes from Wx::ActiveX, and all methods/events from there exit here too.
** You will need to already have the Flash player installed.
new ( PARENT , ID , POS , SIZE )
This will create and return the Flash object.
METHODS
See Wx:ActiveX.
EVENTS
All the events use EVT_ACTIVEX.
ActivexInfos
<EVENTS>
OnReadyStateChange
FSCommand
OnProgress
</EVENTS>
<PROPS>
AlignMode
AllowScriptAccess
BackgroundColor
Base
BGColor
DeviceFont
EmbedMovie
FlashVars
FrameNum
Loop
Menu
Movie
Playing
Quality
Quality2
ReadyState
SAlign
Scale
ScaleMode
SWRemote
TotalFrames
WMode
</PROPS>
<METHODS>
AddRef()
Back()
CurrentFrame()
FlashVersion()
Forward()
FrameLoaded(FrameNum)
GetIDsOfNames(riid , rgszNames , cNames , lcid , rgdispid)
GetTypeInfo(itinfo , lcid , pptinfo)
GetTypeInfoCount(pctinfo)
GetVariable(name)
GotoFrame(FrameNum)
Invoke(dispidMember , riid , lcid , wFlags , pdispparams , pvarResult , pexcepinfo , puArgErr)
IsPlaying()
LoadMovie(layer , url)
Pan(x , y , mode)
PercentLoaded()
Play()
QueryInterface(riid , ppvObj)
Release()
Rewind()
SetVariable(name , value)
SetZoomRect(left , top , right , bottom)
Stop()
StopPlay()
TCallFrame(target , FrameNum)
TCallLabel(target , label)
TCurrentFrame(target)
TCurrentLabel(target)
TGetProperty(target , property)
TGetPropertyAsNumber(target , property)
TGetPropertyNum(target , property)
TGotoFrame(target , FrameNum)
TGotoLabel(target , label)
TPlay(target)
TSetProperty(target , property , value)
TSetPropertyNum(target , property , value)
TStopPlay(target)
Zoom(factor)
</METHODS>
NOTE
This package only works for Win32, since it use AtiveX.
SEE ALSO
AUTHOR
Graciliano M. P. <gm@virtuasites.com.br>
Thanks to wxWindows peoples and Mattia Barbon for wxPerl! :P
Thanks to Justin Bradford <justin@maxwell.ucsf.edu> and Lindsay Mathieson <lmathieson@optusnet.com.au>, that wrote the original C++ classes for wxActiveX and wxIEHtmlWin.
COPYRIGHT
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.