Differenze tra le versioni di "SLEEP"

Da Gambas-it.org - Wikipedia.
Riga 1: Riga 1:
 +
(''pagina ricavata da considerazioni del membro [https://www.gambas-it.org/smf/index.php?action=profile;u=402 vuott] del forum di Gambas-it.org'')
 +
 
La sintassi di SLEEP è:
 
La sintassi di SLEEP è:
 
  <<codice 1>>
 
  <<codice 1>>
Riga 10: Riga 12:
 
Il ciclo di eventi non viene chiamato durante '''SLEEP''' e quindi gli eventi non vengono elaborati.
 
Il ciclo di eventi non viene chiamato durante '''SLEEP''' e quindi gli eventi non vengono elaborati.
  
Per vederne il funzionamento rispetto a '''WAIT''', creiamo un nuovo progetto grafico riportando questo codice:
+
Per vederne il funzionamento rispetto a '''WAIT''', creiamo due nuovi progetti grafici riportando questi codici:
  
 +
Il nome '''''"Sleep"''''', attribuito a questa istruzione, sembra chiarificatore della sua funzione: mette a dormire l'intero processo.
  
  Public Timer1 As Timer
 
  Private $sMode As String = "LIBERO"
 
 
 
 
   Public Sub Form_Open()
 
   Public Sub Form_Open()
 
    
 
    
     Timer1 = New Timer As "Timer1"
+
     Me.Show
     Timer1.Delay = 1000
+
     Wait 0.5  <FONT Color=gray>' ''Il '''Wait''', non bloccando l'intero processo, consente che il Form si apra completamente''</font>
     Timer1.Enabled = True
+
   
 +
    Sleep 5
 +
   
 +
     Print "Fine azione dello 'Sleep' "
 
    
 
    
 
   End
 
   End
 
    
 
    
  Public Sub Form_Close()
 
 
    
 
    
     Timer1.Enabled = False
+
  Public Sub Button1_Click()  <FONT Color=gray>' ''Si noterà che lo '''Sleep''' impedisce lo scatenarsi dell'Evento '''_Clic()''' del Button ! ''</font>
 +
 
 +
     Print "Clic"
 
    
 
    
 
   End
 
   End
 +
 +
 +
'''''"Wait"''''', invece, arresta la sola particolare procedura del codice giunta alla riga di quell'istruzione di attesa, non interferendo però con altre eventuali parti in corso del processo.
 +
 +
 +
  Public Sub Form_Open()
 
    
 
    
  Public Sub Form_MouseUp()
+
    Me.Show
 
    
 
    
    If Mouse.Left Then
+
      Wait 5
      $sMode = "WAIT"
+
 
      Wait 10
+
     Print "Fine azione del 'Wait'"
    Endif
 
     If Mouse.Right Then
 
      $sMode = "SLEEP"
 
      Sleep 10
 
    Endif
 
    $sMode = "LIBERO"
 
 
    
 
    
 
   End
 
   End
 
    
 
    
  Public Sub Form_MouseDown()
 
 
 
    If Mouse.Left Then
 
      Print "---Partenza per 10 secondi di WAIT---"
 
    Else
 
      Print "---Partenza per 10 secondi di SLEEP---"
 
    Endif
 
 
 
  End
 
 
    
 
    
   Public Sub Timer1_Timer()
+
   Public Sub Button1_Click()
 
    
 
    
     Print CInt(Timer);; $sMode
+
     Print "Clic"
 
    
 
    
 
   End
 
   End
Riga 63: Riga 58:
  
 
'''SLEEP''' però, in più rispetto a '''WAIT''', non si limita a bloccare, per il tempo stabilito, il sollevarsi dell'Evento e la procedura ove tale istruzione di attesa è posta, ma blocca ogni altro Evento che possa essere sollevato dal progetto.
 
'''SLEEP''' però, in più rispetto a '''WAIT''', non si limita a bloccare, per il tempo stabilito, il sollevarsi dell'Evento e la procedura ove tale istruzione di attesa è posta, ma blocca ogni altro Evento che possa essere sollevato dal progetto.
 +
  
 
=Vedi anche=
 
=Vedi anche=
 
[https://www.gambas-it.org/wiki/index.php?title=WAIT WAIT]
 
[https://www.gambas-it.org/wiki/index.php?title=WAIT WAIT]

Versione delle 05:55, 5 set 2020

(pagina ricavata da considerazioni del membro vuott del forum di Gambas-it.org)

La sintassi di SLEEP è:

<<codice 1>>
Sleep n
<<codice 2>>

Arresta il programma durante un ritardo specificato con n facendolo dormire, ovvero restituendo il suo tempo di CPU al sistema operativo.

Il ritardo è un numero di secondi e può essere un numero in virgola mobile.

Il ciclo di eventi non viene chiamato durante SLEEP e quindi gli eventi non vengono elaborati.

Per vederne il funzionamento rispetto a WAIT, creiamo due nuovi progetti grafici riportando questi codici:

Il nome "Sleep", attribuito a questa istruzione, sembra chiarificatore della sua funzione: mette a dormire l'intero processo.

 Public Sub Form_Open()
 
   Me.Show
   Wait 0.5   ' Il Wait, non bloccando l'intero processo, consente che il Form si apra completamente
   
   Sleep 5
   
   Print "Fine azione dello 'Sleep' "
 
 End
 
 
 Public Sub Button1_Click()  ' Si noterà che lo Sleep impedisce lo scatenarsi dell'Evento _Clic() del Button ! 
 
   Print "Clic"
 
 End


"Wait", invece, arresta la sola particolare procedura del codice giunta alla riga di quell'istruzione di attesa, non interferendo però con altre eventuali parti in corso del processo.


 Public Sub Form_Open()
 
   Me.Show
 
      Wait 5
 
   Print "Fine azione del 'Wait'"
 
 End
 
 
 Public Sub Button1_Click()
 
   Print "Clic"
 
 End

In vero, sia SLEEP che WAIT interrompono l'esecuzione corretta e completa di un Evento, qualora posti all'interno della routine di tale Evento.

SLEEP però, in più rispetto a WAIT, non si limita a bloccare, per il tempo stabilito, il sollevarsi dell'Evento e la procedura ove tale istruzione di attesa è posta, ma blocca ogni altro Evento che possa essere sollevato dal progetto.


Vedi anche

WAIT