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

Da Gambas-it.org - Wikipedia.
(Nuova pagina: ''<Font Color= #006400>' Gambas class file''</font> Private hpro As Process '''Public''' Sub Button1_Click() ''<Font Color= #006400>' parte l'applicazione, per esempio ...)
 
 
(6 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
−
  ''<Font Color= #006400>' Gambas class file''</font>
+
Esempio con programma in ambiente grafico:
 +
  Private <FONT Color=#B22222>pro</font> As Process
 
   
 
   
 
   
 
   
−
  Private hpro As Process
+
  Public Sub Button1_Click()
 
   
 
   
 +
<Font Color=gray>' ''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:''</font>
 +
  <FONT Color=#B22222>pro</font> = Shell "gedit" As "<Font Color=green>Processo</font>"
 
   
 
   
−
  '''Public''' Sub Button1_Click()
+
  <Font Color=gray>' ''oppure si può usare "Exec":''
 +
' '''pro = Exec ["gedit"] As "Processo"'''</font>
 
   
 
   
−
  ''<Font Color= #006400>' parte l'applicazione, per esempio “ Gedit “:''</font>
+
  End
−
  hpro = Exec ["gedit"] As "processo"
 
 
   
 
   
−
''<Font Color= #006400>' oppure si può usare "Shell":''
 
−
  hpro = Shell "gedit" As "processo"</font>
 
 
   
 
   
−
  '''End'''
+
  Public Sub button2_Click()
 
   
 
   
 +
<Font Color=gray>' ''Elimina il processo dell'applicazione "Gedit":''</font>
 +
  <FONT Color=#B22222>pro</font>.kill
 
   
 
   
−
  '''Public''' Sub button2_Click()
+
  End
 
   
 
   
−
''<Font Color= #006400>' chiude il processo dell'applicazione:''</font>
 
−
  hpro.kill
 
 
   
 
   
−
  '''End'''
+
  Public Sub <Font Color=green>Processo</font>_Kill() ''<Font Color=gray>' ''Questo evento viene sollevato alla chiusura del programma gestito da "Process"''</font>
 +
 +
  Print "Il processo è stato terminato !"
 +
 +
End
 +
 
 +
 
 +
Esempio con programma ''a riga di comando'':
 +
Private pro As Process
 +
 +
 +
Public Sub Main()
 
    
 
    
 +
  pro = Shell "cvlc <Font Color=gray>''/percorso/del/file/multimediale''</font>" As "Processo"
 +
   
 +
End
 +
 +
 +
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 "cvlc":''</font>
 +
  pro.Kill
 +
 
 +
End
 +
 +
 +
Public Sub Processo_Kill()
 
   
 
   
−
'''Public''' Sub processo_Kill() ''<Font Color= #006400>' questo evento viene sollevato alla chiusura del programma gestito da "Process"''</font>
+
  Print "Il processo è stato terminato !"
 
   
 
   
−
    Print "Il processo è stato chiuso !"
+
<Font Color=gray>' ''Chiude l'applicazione Gambas:''</font>
 +
  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
Estratto da "https://www.gambas-it.org/wiki/index.php?title=Apertura_e_chiusura_di_un_processo_mediante_Process&oldid=34623"