Appendix A: QProcess
| Documentation composant par D.Glodt (c)2003 |
Appendix A: QProcess |
|
QProcess Composant
QProcess est un composant non visible charger d'exécuter un processus
en arriere plan via une routine utilisateur.
QProcess Proprietés
|
|
|
|
|
| Priority |
LONG |
L/E |
0 |
|
Priorité du processus avec les valeurs suivantes:
ProcessLow=-2
ProcessBelowNormal=-1
ProcessNormal=0
ProcessHight=2
ProcessAboveNormal=1
ProcessTimeCritical=15
ProcessIdle=-15 |
|
|
|
QProcess Methodes
| Methode |
Type |
Description |
Parametres |
|
|
|
|
|
| Open |
SUB |
Lance le processus |
0 |
|
| Close |
SUB |
Stop le processus |
0 |
|
QProcess Evenements
| Evenement |
Type |
Declenchement |
Parametres |
|
|
|
|
|
| OnProcess |
|
Exécution du process |
0 |
|
QProcess Exemples
$TYPECHECK ON
$INCLUDE "RAPIDQ.INC"
$include "Object\QProcess.inc"
'Subs internes
declare sub rout1
DECLARE SUB OpenClick
DECLARE SUB SendClick
DECLARE SUB fin
'Variables globales
dim num as long
dim process as QProcess
process.OnProcess=rout1 'routine processus
CREATE Form AS QFORM
Caption = "Test process"
Width=200
Height=200
Center
CREATE OpenButton AS QBUTTON
Caption="&Open"
Left=20
Top=50
height=20
OnClick=OpenClick
END CREATE
CREATE butexit AS QBUTTON
Caption="Close"
Left=20
Top=75
height=20
Enabled=0
OnClick=fin
END CREATE
CREATE ED AS QEDIT
left=10
top=10
width=100
END CREATE
END CREATE
Form.ShowModal
SUB fin
process.close
OpenButton.enabled=1
end sub
SUB OpenClick
OpenButton.enabled=0
butexit.enabled=1
process.priority=ProcessNormal
process.open
END SUB
sub rout1 'routine processus
while true
sleep 0.1
num++
ed.text="Count"+str$(num)
wend
end sub
| 
搜索
论坛
Home
回顶部
g.yi.org Hits:0 Last modified:2003-10-10 16:01:10
