:ciao:
Il titolo è un po' d'effetto! :D
' Gambas class file
Static Bol As Boolean = 0
Public Sub BT_parti_Click()
Dim i As Integer
Print "Start"
For i = 1 To 1000
If Bol = 1 Then
Print "Fermato"
Break
Endif
Wait 0.01
Next
Print "Finito"
End
Public Sub BT_ferma_Click()
Bol = 1
Print "Fermata prenotata"
End
Stavo provando e giocando.
In breve, non riesco ad uscire dalla routine che è attivata dal pulsante BT_parti perchè, se anche la variabile booleana Bol cambia, per opera del pulsante BT_ferma, la routine BT_parti non se ne accorge.!
In questo caso come si fa? Qualcuno ha idee?
:ciao: :ciao:
Ho dimenticato di aggiungere questo, prova questo codice:
Public Sub Form_Open()
Print CInt(True)
Print CInt(False)
End
Quindi puoi cambiare il codice così:
Static Bol As Boolean
Public Sub BT_parti_Click()
Dim i As Integer
Print "Start"
For i = 1 To 1000
If Bol Then
Print "Fermato"
Break
Endif
Wait 0.01
Next
Print "Finito"
End
Public Sub BT_ferma_Click()
Bol = -1
Print "Fermata prenotata"
End
:ciao: