Marco Caresia wrote:
Jack wrote:

Label (0) = ThisComponent.DrawPage.Forms.Standard.lbl0
Label (1) = ThisComponent.DrawPage.Forms.Standard.lbl1
Label (2) = ThisComponent.DrawPage.Forms.Standard.lbl2
Label (3) = ThisComponent.DrawPage.Forms.Standard.lbl3
Label (4) = ThisComponent.DrawPage.Forms.Standard.lbl4
Label (5) = ThisComponent.DrawPage.Forms.Standard.lbl5
Ecc...


for x=0 to 20
    Label(x)=ThisComponent.DrawPage.Forms.Standard.getbyname("lbl"&(x))
next

Quello che hai scritto e' quello che ho scritto io
 For x = 0 to 20 step 1
     Label(x).BackgroundColor = 16711680 ' rosso
    Wait 250
 Next

Per ottenere l' array a dovuto dichiararlo  Dim Label (20) as Object
e poi assegnargli una ad una tutte le Label, una _grandissima_ scocciatura, io vorrei evitare questo cercando un metodo piu' veloce, in Visual Basic posso ottenere una matrice di Controlli semplicemente dando al Nome al Controllo Label(0) al secondo Label(1) ecc..

E possibile ottenere una cosa del genere anche in StarBasic ? Lo scopo e' quello di eliminare l' assegnazione a manina dei Controlli all' Array. Ciao Jack
















--

Email.it, the professional e-mail, gratis per te: http://www.email.it/f



Sponsor:

Problemi di Liquidità? Con Logos Finanziaria 30.000 € in 24 ore a dipendenti e 
lavoratori autonomi con rimborsi fino a 120 mesi, clicca qui

*
Clicca qui: http://adv.email.it/cgi-bin/foclick.cgi?mid=2911&d=4-3

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Rispondere a