Appendix A: QSplash
Documentation composant par D.Glodt (c)2003 |
Appendix A: QSplash |
|
QSplash Composant
QSplash est utilisé pour l'affichage banniere durant un temps avant
l'ouverture d'une application.
Un texte descriptif d'application peut etre ajouté en dessous de
l'image ou sur l'image.
QSplash Proprietés
Champs |
Type |
L/E |
Défaut |
|
|
|
|
|
Image |
QIMAGE |
L/E |
|
|
Image a afficher |
|
|
|
Text |
STRING |
L/E |
|
|
|
Texte a propos de l'application |
|
|
|
TextFont |
QFONT |
L/E |
|
|
TextTransparent |
BOOLEAN |
L/E |
False |
|
|
Affichage du texte sur l'image |
|
|
|
TextCenter |
SHORT |
L/E |
False |
|
|
Texte centré horizontallement |
|
|
|
TextLeft |
SHORT |
L/E |
|
|
TextTop |
SHORT |
L/E |
|
|
|
Actif si proprieté TextTransparent a True |
|
|
|
QSplash Methodes
Methode |
Type |
Description |
Parametres |
|
|
|
|
|
Show |
SUB(Time%) |
Affichage banniere |
1 |
QSplash Evenements
Evenement |
Type |
Declenchement |
Parametres |
|
|
|
|
|
QSplash Exemple
$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
|