Wx::ActiveX - ActiveX interface. (Beta) (only Wx:ActiveX::IE is stable)
use Wx::ActiveX ; my $activex = Wx::ActiveX->new( $this , "ShockwaveFlash.ShockwaveFlash" , 101 , wxDefaultPosition , wxDefaultSize );
This is only the basics to load an ActiveX control inside Wx. For now it only handle events. Still can't use methods of a control! ;-/ (Maybe you can help in this part of the development. ;-P)
Create the ActiveX control.
All the events use EVT_ACTIVEX.
EVT_ACTIVEX($parent , $activex , "EventName" , sub{...} ) ;
You can get the list of ActiveX events using GetEventName():
for(0..($activex->GetEventCount)) { my $evt_name = $activex->GetEventName($_) ; print "$_> $evt_name\n" ; }
Eache ActiveX event has their own argument list (hash), and the Key 'Cancel' can be used to ignore the event. In this example any new window will be canceled, seting $evt->{Cancel} to true:
EVT_ACTIVEX($this,$activex,sub{ my ( $obj , $evt ) = @_ ; $evt->{Cancel} = 1 ; }) ;
This package only works for Win32, since it use AtiveX.
Wx:ActiveX::IE Wx
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 C classes for wxActiveX and wxIEHtmlWin.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Wx::ActiveX, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Wx::ActiveX
CPAN shell
perl -MCPAN -e shell install Wx::ActiveX
For more information on module installation, please visit the detailed CPAN module installation guide.