Titolo: Lista dei processi attivi
Categoria: Codice |
|
Ultimo Aggiornamento: 30/03/05 |
La funzione Count tasks ritorna il numero totale dei processi che sono stati aperti in un'applicazione 4D, inclusi i processi ormai chiusi. Ecco una semplice procedura che riempie due array con i nomi e i corrispondenti numeri dei processi attivi: la regola che usa è che lo stato del processo è 0 se in esecuzione, positivo se in pausa o in qualche altro stato di attesa, negativo se non esiste o se ha finito.
C_LONGINT($quantiProcessi_l;$quantiAttivi_l;$processo_l;$stato_l;$tempo_l)
$quantiProcessi_l:=Count tasks
ARRAY STRING(31;procNomi_at;$quantiProcessi_l)
ARRAY INTEGER(procNum_al;$quantiProcessi_l)
$quantiAttivi_l:=0
For ($processo_l;1;$quantiProcessi_l)
If (Process state($processo_l)>=
Executing )
$quantiAttivi_l:=$quantiAttivi_l +1
PROCESS PROPERTIES($processo_l;$procNomi_at{$quantiAttivi_l};$stato_l;$tempo_l)
$procNum_al{$quantiAttivi_l}:=$processo_l
End if End for ARRAY STRING(31;$procNomi_at;$quantiAttivi_l)
ARRAY INTEGER($procNum_al;$quantiAttivi_l)
| Inviato da: Umberto Migliore |
|
Visite: 12441 |
Se accedi con utente e password, puoi aggiungere dei commenti.
