Differenze tra le versioni di "Impedire che cliccando su un tasto della tastiera si produca più volte il medesimo effetto"

Da Gambas-it.org - Wikipedia.
(Creata pagina con "Sappiamo che, utilizzando l'evento ''_KeyPress()'', allo scatenarsi di tale evento un comando presente nelle sua routine si scatena ripetutamente sino a quando il tasto non ve...")
 
Riga 1: Riga 1:
 
Sappiamo che, utilizzando l'evento ''_KeyPress()'', allo scatenarsi di tale evento un comando presente nelle sua routine si scatena ripetutamente sino a quando il tasto non verrà rilasciato.
 
Sappiamo che, utilizzando l'evento ''_KeyPress()'', allo scatenarsi di tale evento un comando presente nelle sua routine si scatena ripetutamente sino a quando il tasto non verrà rilasciato.
  
Per ovviare a questo problema, e quindi per far produrre solo una volta l'effetto di quando previsto nella routine dell'evento ''_KeyPress()'', possiamo adottare un codice come il seguente:
+
Per ovviare a questo problema, e quindi per far produrre solo una volta l'effetto di quanto previsto nella routine dell'evento ''_KeyPress()'', possiamo adottare un codice come il seguente:
 
  Private status As Byte
 
  Private status As Byte
 
   
 
   

Versione delle 12:27, 1 dic 2015

Sappiamo che, utilizzando l'evento _KeyPress(), allo scatenarsi di tale evento un comando presente nelle sua routine si scatena ripetutamente sino a quando il tasto non verrà rilasciato.

Per ovviare a questo problema, e quindi per far produrre solo una volta l'effetto di quanto previsto nella routine dell'evento _KeyPress(), possiamo adottare un codice come il seguente:

Private status As Byte


Public Sub Form_KeyPress()
 
 If status = 0 Then
   Print "Produzione effetto"
   status = 1
 Endif
 
End


Public Sub Form_KeyRelease()
 
 Print "Tasto rilasciato"
 
 status = 0
   
End