Appendix A: QGLASSFRAME
Rapid-Q Documentation by William Yu (c)1999 |
Appendix A: QGLASSFRAME |
|
QGLASSFRAME Component
QGlassFrame is a 3rd party Rapid-Q component, that makes your form look transparent and shaded,
made possible by Aleksey Xacker.
No support is offered for this component, there are some special cases in using
this component.
QGlassFrame Properties
Field | Type | R/W | Default |
|
|
|
|
Align | INTEGER | RW | alNone |
ClientHeight | INTEGER | RW | |
ClientWidth | INTEGER | RW | |
Color | INTEGER | RW | |
Cursor | INTEGER | RW | crDefault |
Handle | INTEGER | RW | |
Height | INTEGER | RW | |
Hint | STRING | RW | |
Left | INTEGER | RW | |
Moveable | INTEGER | RW | True |
Parent | QFORM/QPANEL/QTABCONTROL | W | |
PopupMenu | QPOPUPMENU | W | |
ShowHint | INTEGER | RW | False |
Top | INTEGER | RW | |
Transparency | INTEGER | RW | 60 |
TransparentColor | INTEGER | RW | 0 |
Width | INTEGER | RW | |
QGlassFrame Methods
Method | Type | Description | Params |
|
|
|
|
QGlassFrame Examples
$INCLUDE "RAPIDQ.INC"
CREATE Form AS QForm
Caption = "Transparent Form"
Center
CREATE GlassFrame AS QGlassFrame
Align = alClient
END CREATE
ShowModal
END CREATE
'------- Weird transparency color error
$INCLUDE "RAPIDQ.INC"
CREATE Form AS QForm
Caption = "Transparent Form"
Center
CREATE GlassFrame AS QGlassFrame
Align = alClient
TransparentColor = &HFF0000
END CREATE
Show
END CREATE
'-- I don't know what's wrong, but doing this seems to
'-- work better than using ShowModal when changing colors
DO
DoEvents
LOOP UNTIL Form.Visible = 0
|
|