' Rapid-Q by William Yu (c)1999-2000                                             .
' ================================================================================
' Upload_il_tuo_script_su_Rapidq.it

' Qolecontainer

****** QOLECONTAINER Component ******
QOleContainer is an ActiveX container whose properties and methods can be
accessed similar to QOleObject.

QOleContainer Properties
Field               Type                R/W                 Default
=================== =================== =================== ===================
Align               INTEGER             RW                  alNone
AllowInPlace        INTEGER             RW                  True
AutoShow            INTEGER             RW                  True
BorderStyle         INTEGER             RW                  bsSingle
Color               INTEGER             RW
Cursor              INTEGER             RW                  crDefault
Enabled             INTEGER             RW                  True
Handle              INTEGER             R
Height              INTEGER             RW
Hint                STRING              RW
Left                INTEGER             RW                  0
Modified            INTEGER             RW                  False
Parent              QFORM/QPANEL/       W
                    QTABCONTROL
ShowHint            INTEGER             RW                  False
SizeMode            INTEGER             RW                  smClip
State               INTEGER             RW                  osEmpty
TabOrder            INTEGER             RW
Tag                 INTEGER             RW
Top                 INTEGER             RW                  0
Width               INTEGER             RW
Visible             INTEGER             RW                  True

QOleContainer Methods
Method              Type                Description         Params
=================== =================== =================== ===================
                    FUNCTION (ClassName Create new embedded
CreateObject        AS STRING) AS       object              1
                    INTEGER
Free                SUB                 Release object      0
                    FUNCTIONI (ID AS    Invoke method/
Invoke              STRING, Params,     property            Infinite
                    ...) AS VARIANT

QOleContainer Events
Event               Type                Occurs when...      Params
=================== =================== =================== ===================
OnKeyDown           SUB (Key AS Word,   Key held down       2
                    Shift AS INTEGER)
OnKeyPress          SUB (Key AS BYTE)   User presses a key  1
OnKeyUp             SUB (Key AS Word,   User releases a key 2
                    Shift AS INTEGER)
OnMouseDown         SUB (Button%, X%,   Mouse button held   4
                    Y%, Shift%)         down
OnMouseMove         SUB (X%, Y%,        Mouse moves         3
                    Shift%)
OnMouseUp           SUB (Button%, X%,   Mouse button is     4
                    Y%, Shift%)         released
OnObjectMove        SUB (Rect AS QRECT) OLE Object has      1
                                        moved or resized
OnResize            VOID                After OLE container 0
                                        is resized


QOleContainer Examples
' This example requires GIF89.DLL which can be found on
' Rapid-Q's knowledge base page.
' Make sure to register the .DLL if you haven't already
' c:\blah> regsvr32 gif89.dll

' Note, example works best if you load an animated GIF file.

CREATE Form AS QFORM
    Caption = "Animated GIFs"
    Center
    Visible = 1
    CREATE GifAnimation AS QOLECONTAINER
        Align = alClient
        CreateObject("Gif89.Gif89.1")
        '-- FileName is a property in GIF89.DLL
        FileName = "anim.gif"
    END CREATE
    Visible = 0
END CREATE

Form.ShowModal

GifAnimation.Free



' ===============================================================================
'                      2003 Holyguard.net - 2007_Abruzzoweb