Gasp, se dovrò acquistare questo B4A e rifarmi poi con le mie App, come spero di riuscirci se mi blocco su queste cose, allora ce ne vorranno di secoli
Allora, nella Activity (o in un Panel), metto due immagini che dovrebbero alternarsi e, quando si tocca una delle due, dovrebbe proseguire l'app.
Ora, anche se vi sarà qualche errore, comunque, non riesco ad intercettare il tasto Click e ne ho provate di diverse
Eppure se la condizione del Do Until è vera dovrebbe terminare... o sbaglio?
Ma è possibile intercettarlo?
Oppure come fare?
Tanks
Allora, nella Activity (o in un Panel), metto due immagini che dovrebbero alternarsi e, quando si tocca una delle due, dovrebbe proseguire l'app.
B4X:
Do Until Vclick
If Vclick = True Then
Msgbox("Premuto", "ok")
Exit
Else
ImgStart2.Visible = True
ImgStart1.Visible = True
Attendi(2)
ImgStart2.Visible = True
ImgStart1.Visible = False
Attendi(2)
End If
Loop
B4X:
Sub Attendi(Secondi As Int)
Dim Ti As Long
Ti = DateTime.Now + (Secondi * 500)
Do While DateTime.Now < Ti
DoEvents
Loop
End Sub
B4X:
Sub ImgStart1_Click
Vclick = True
End Sub
Sub ImgStart2_Click
Vclick = True
End Sub
Ora, anche se vi sarà qualche errore, comunque, non riesco ad intercettare il tasto Click e ne ho provate di diverse
Eppure se la condizione del Do Until è vera dovrebbe terminare... o sbaglio?
Ma è possibile intercettarlo?
Oppure come fare?
Tanks
Last edited: