NAME

Wx::ActiveX::ScriptControl - interface to MSScriptControl.ScriptControl ActiveX Control

SYNOPSIS

use Wx::ActiveX::ScriptControl qw( :everything );

..........

my $activex = Wx::ActiveX::ScriptControl->new( $parent );

OR

my $activex = Wx::ActiveX::ScriptControl->newVersion( 1, $parent );

EVT_ACTIVEX_SCRIPTCONTROL_ERROR( $handler, $activex, \&on_event_error );

DESCRIPTION

Interface to MSScriptControl.ScriptControl ActiveX Control

METHODS

new

my $activex = Wx::ActiveX::ScriptControl->new(
                    $parent,
                    $windowid,
                    $position,
                    $size,
                    $style,
                    $name);

Returns a new instance of Wx::ActiveX::ScriptControl. Only $parent is mandatory. $parent must be derived from Wx::Window (e.g. Wx::Frame, Wx::Panel etc). This constructor creates an instance using the latest version available of MSScriptControl.ScriptControl.

newVersion

my $activex = Wx::ActiveX::ScriptControl->newVersion(
                    $version
                    $parent,
                    $windowid,
                    $position,
                    $size,
                    $style,
                    $name);

Returns a new instance of Wx::ActiveX::ScriptControl. $version and $parent are mandatory. $parent must be derived from Wx::Window (e.g. Wx::Frame, Wx::Panel etc). This constructor creates an instance using the specific type library specified in $version of MSScriptControl.ScriptControl.

e.g. $version = 4;

will produce an instance based on the type library for

MSScriptControl.ScriptControl.4

EVENTS

The module provides the following exportable event subs

EVT_ACTIVEX_SCRIPTCONTROL_ERROR( $evthandler, $activexcontrol, \&on_event_scriptcontrol_sub );
EVT_ACTIVEX_SCRIPTCONTROL_TIMEOUT( $evthandler, $activexcontrol, \&on_event_scriptcontrol_sub );

ACTIVEX INFO

Events

Error
Timeout

Methods

_AboutBox()
AddCode(Code)
AddObject(Name , Object , AddMembers)
AddRef()
Eval(Expression)
ExecuteStatement(Statement)
GetIDsOfNames(riid , rgszNames , cNames , lcid , rgdispid)
GetTypeInfo(itinfo , lcid , pptinfo)
GetTypeInfoCount(pctinfo)
Invoke(dispidMember , riid , lcid , wFlags , pdispparams , pvarResult , pexcepinfo , puArgErr)
QueryInterface(riid , ppvObj)
Release()
Reset()
Run(ProcedureName , Parameters)

Properties

AllowUI
CodeObject
Error
Language
Modules
Procedures
SitehWnd
State
Timeout
UseSafeSubset

COPYRIGHT & LICENSE

Copyright (C) 2008 Mark Dootson

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.