Documentation component by D.Glodt (c)2003 | Appendix A: QSplash |
|
Champs | Type | R/W | Défault | |
|
|
|
|
|
Image | QIMAGE | R/W | ||
Image to show | ||||
Text | STRING | R/W | ||
Text about application | ||||
TextFont | QFONT | R/W | ||
TextTransparent | BOOLEAN | R/W | False | |
Display text on image | ||||
TextCenter | BOOLEAN | R/W | False | |
Text centered horizontal | ||||
TextLeft | SHORT | R/W | ||
TextTop | SHORT | R/W | ||
Actif if property TextTransparent at True |
Method | Type | Description | Params | |
|
|
|
|
|
Show | SUB(Time%) | Show banner | 1 |
Event | Type | Occurs when... | Params | |
|
|
|
|
|
QSplash Example
$TYPECHECK ON
$INCLUDE "RAPIDQ.INC"
$INCLUDE "Object\QSplash.inc"
DECLARE SUB DisplaySplashForm
$resource banner as "banner.bmp"
Dim splash as QSplash
splash.image.bmphandle=banner
splash.TextCenter=True
splash.TextFont.size=10
splash.Text="Version 1.0 Copyright(c) D.Glodt"
CREATE MainForm AS QFORM
Caption = "MainForm"
Width = 520
Height = 340
Center
OnShow=DisplaySplashForm
END CREATE
SUB DisplaySplashForm
Splash.Show(3)
End Sub
MainForm.ShowModal