Differenze tra le versioni di "Apertura e chiusura di un processo mediante Process"

Da Gambas-it.org - Wikipedia.
 
Riga 6: Riga 6:
 
   
 
   
 
  <Font Color=gray>' ''Parte l'applicazione (per esempio "Gedit ")''.
 
  <Font Color=gray>' ''Parte l'applicazione (per esempio "Gedit ")''.
  ' ''Il processo dell'applicazione viene gestito con una variabile di tipo "Processo" che viene altresì associata ad un gruppo di Eventi:''</font>
+
  ' ''Il processo dell'applicazione "Gedit" viene gestito con una variabile di tipo "Processo" che viene altresì associata ad un gruppo di Eventi:''</font>
 
   <FONT Color=#B22222>pro</font> = Shell "gedit" As "<Font Color=green>Processo</font>"
 
   <FONT Color=#B22222>pro</font> = Shell "gedit" As "<Font Color=green>Processo</font>"
 
   
 
   
Riga 17: Riga 17:
 
  Public Sub button2_Click()
 
  Public Sub button2_Click()
 
   
 
   
  <Font Color=gray>' ''Elimina il processo dell'applicazione:''</font>
+
  <Font Color=gray>' ''Elimina il processo dell'applicazione "Gedit":''</font>
 
   <FONT Color=#B22222>pro</font>.kill
 
   <FONT Color=#B22222>pro</font>.kill
 
   
 
   
Riga 43: Riga 43:
 
  Public Sub Application_Read()  <Font Color=gray>' ''Basta premere il tasto "Invio" per sollevare questo evento.''</font>
 
  Public Sub Application_Read()  <Font Color=gray>' ''Basta premere il tasto "Invio" per sollevare questo evento.''</font>
 
    
 
    
  <Font Color=gray>' ''Elimina il processo dell'applicazione:''</font>
+
  <Font Color=gray>' ''Elimina il processo dell'applicazione "cvlc":''</font>
 
   pro.Kill
 
   pro.Kill
 
    
 
    
Riga 53: Riga 53:
 
   Print "Il processo è stato terminato !"
 
   Print "Il processo è stato terminato !"
 
   
 
   
  <Font Color=gray>' ''Chiude l'applicazione:''</font>
+
  <Font Color=gray>' ''Chiude l'applicazione Gambas:''</font>
 
   Quit
 
   Quit
 
   
 
   
 
  End
 
  End

Versione attuale delle 09:11, 30 lug 2023

Esempio con programma in ambiente grafico:

Private pro As Process


Public Sub Button1_Click()

' Parte l'applicazione (per esempio "Gedit ").
' Il processo dell'applicazione "Gedit" viene gestito con una variabile di tipo "Processo" che viene altresì associata ad un gruppo di Eventi:
 pro = Shell "gedit" As "Processo"

' oppure si può usare "Exec":
' pro = Exec ["gedit"] As "Processo"

End


Public Sub button2_Click()

' Elimina il processo dell'applicazione "Gedit":
 pro.kill

End


Public Sub Processo_Kill() ' Questo evento viene sollevato alla chiusura del programma gestito da "Process"

 Print "Il processo è stato terminato !"

End


Esempio con programma a riga di comando:

Private pro As Process


Public Sub Main()
 
 pro = Shell "cvlc /percorso/del/file/multimediale" As "Processo"
    
End


Public Sub Application_Read()   ' Basta premere il tasto "Invio" per sollevare questo evento.
 
' Elimina il processo dell'applicazione "cvlc":
 pro.Kill
  
End


Public Sub Processo_Kill()

 Print "Il processo è stato terminato !"

' Chiude l'applicazione Gambas:
 Quit

End