Appendix A: QOLECONTAINER
Rapid-Q Documentation by William Yu (c)1999 |
Appendix A: 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/QTABCONTROL | W | |
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 |
|
|
|
|
CreateObject | FUNCTION (ClassName AS STRING) AS INTEGER | Create new embedded object | 1 |
Free | SUB | Release object | 0 |
Invoke | FUNCTIONI (ID AS STRING, Params, ...) AS VARIANT | Invoke method/property | Infinite |
QOleContainer Events
Event | Type | Occurs when... | Params |
|
|
|
|
OnKeyDown | SUB (Key AS Word, Shift AS INTEGER) | Key held down | 2 |
OnKeyPress | SUB (Key AS BYTE) | User presses a key | 1 |
OnKeyUp | SUB (Key AS Word, Shift AS INTEGER) | User releases a key | 2 |
OnMouseDown | SUB (Button%, X%, Y%, Shift%) | Mouse button held down | 4 |
OnMouseMove | SUB (X%, Y%, Shift%) | Mouse moves | 3 |
OnMouseUp | SUB (Button%, X%, Y%, Shift%) | Mouse button is released | 4 |
OnObjectMove | SUB (Rect AS QRECT) | OLE Object has moved or resized | 1 |
OnResize | VOID | After OLE container is resized | 0 |
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
|
|