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.