Italian B4J - creare controlli a run-time

[kelvo01]

Ho creato una classe per un form, che creo al volo.
Sto cercando di mettere del controlli 'label' e 'textfield' al volo , i controllo li crea , ma come recupero i valori? mi da stringhe vuote ...


Sub Class_Globals
Private fx As JFX
Dim frm As Form
Dim txtCampi(100) As TextField

End Sub

...

For i = 0 To 5
txtCampi(i).Initialize("txtCampi")
txtCampi(i).Text = "qualcosa ..."
frm.RootPane.AddNode(txtCampi(i), 80,20+20*i,-1, -1)
Next

Sub btn_Action
Dim b As Button = Sender
clicco.Text="zzzzzzz"&txtCampi(0)&txtCampi(1)
End Sub

e' un bottone se lo clicco nel form nella 'label' clicco mette solo 'zzzzzzz'

non penso di essere stato complicato ..., dove sbaglio ?

 

[moore_it]

intanto sembra mancare il .text .... in &txtCampi(0).text&txtCampi(1).text