Differenze tra le versioni di "Apertura e chiusura di un processo mediante Process"
Da Gambas-it.org - Wikipedia.
Riga 40: | Riga 40: | ||
− | '''Public''' Sub Application_Read() <Font Color=gray>' ''Basta premere il tasto " | + | '''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:''</font> |
Versione delle 13:01, 24 apr 2020
Esempio con programma in ambiente grafico:
Private hpro As Process Public Sub Button1_Click() ' Parte l'applicazione, per esempio “ Gedit “: hpro = Exec ["gedit"] As "processo" ' oppure si può usare "Shell": hpro = Shell "gedit" As "processo" End Public Sub button2_Click() ' Elimina il processo dell'applicazione: hpro.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 pr As Process Public Sub Main() pr = Shell "cvlc /tmp/automatisches_licht_AN.mp3" As "Processo" End Public Sub Application_Read() ' Basta premere il tasto "Invio" per sollevare questo evento. ' Elimina il processo dell'applicazione: pr.Kill ' Chiude l'applicazione: Quit End