Italian Pulsanti lettura / eliminazione

nonno

Active Member
Licensed User
Longtime User
ciao ragazzi , come il solito ho un problema, ho provando in vari modi… con il ciclo for/next creo i pulsanti che voglio.
Se li voglio leggere quale comando devo usare, sender funzione sul pulsante che schiaccio, se con lo stesso ciclo che li ho creati e voglio cancellarli / sapere il colore / il testo, quale comando dovrei usare, qualche consiglio ? Grazie mille


For i =0 To 6

Dim buton As Button
buton.Initialize("buton")
buton.Text= "Laike"
Activity.AddView(buton,2%x,(i+5)*70,50%x,50%y)

Next
 

LucaMs

Expert
Licensed User
Longtime User
Ciao.

Intanto non li creerei da codice ma usando il Designer.

Se proprio vuoi farlo in quel modo, memorizzali in un array:

B4X:
Sub Globals
Dim arrButons(7) As Button

For i =0 To 6
   Dim buton As Button
   buton.Initialize("buton")
   buton.Text= "Laike"
   Activity.AddView(buton,2%x,(i+5)*70,50%x,50%y)
   arrButons(i) = buton
Next

Poi potrai scrivere:
B4X:
arrButons(3).Text = "Ciao"
 
Last edited:

LucaMs

Expert
Licensed User
Longtime User
creali da Designer il codice per sapere il colore del pulsante oppure il testo, non rimane uguale 🤔
Sì, puoi rilevare solo quello premuto. Per fare ciò che vuoi tu, è necessario usare ugualmente un array.
Il vantaggio è non dover scrivere quel codice per la creazione e la possibilità di riutilizzare il layout o perfino copiare i button in un layout per b4j o b4i.
Non solo; se decidi di cambiare qualcosa (il loro numero, dimensione, posizione...) è molto più facile farlo nel Designer.
 
Last edited:
Top