1
Programmazione (Gambas 2) / Re: Automatizzare l'assegnazione ad una variabile del contenuto TextLabel
« il: 30 Ottobre 2011, 12:08:17 »
RISOLTO - in VB6 gli oggetti "clonati" nel form automaticamente venivano creati come array tipo Text1[n].text in Gambas in un altro post riportava questa soluzione:
PUBLIC SUB Form_Open()
DIM tips AS NEW Object[]
DIM i, i_tips, tips_y AS Integer
i_tips = 5
FOR i = 0 TO i_tips
tips.Add(Label, i)
tips = NEW Label(ME)
WITH tips
.X = 10
.Y = tips_y
.width = 100
.height = 20
.text = "Abc " & i
END WITH
tips_y += 30
NEXT
END
PUBLIC SUB Form_Open()
DIM tips AS NEW Object[]
DIM i, i_tips, tips_y AS Integer
i_tips = 5
FOR i = 0 TO i_tips
tips.Add(Label, i)
tips = NEW Label(ME)
WITH tips
.X = 10
.Y = tips_y
.width = 100
.height = 20
.text = "Abc " & i
END WITH
tips_y += 30
NEXT
END