Il problema persiste !
Ciao...
Per quanto riguarda le parentesi, avevi ragione...le avevo dimenticate
Ma il problema iniziale persiste, non scrive nulla !
Ed inoltre nonso come inserire il carattere "/"
Ciao e grazie
Cmq...ecco il codice rivisto...logicamente sembrerebbe funzionare
initX=100
initY=100
Larghezza=300
Altezza=100
_root.Prova = function(StringaEst,Nfile) {
Numero=0
i=0
while(i<=length(StringaEst)) {
i=i+1
Pezzo=substring (StringaEst,1,i)
carattereATT=substring (Pezzo,i,1)
if (carattereATT==="T") { //A proposito come faccio a indicare la backslash al posto di T?
Numero=Numero+1 //Numero le Backslah, quindi le cartelle
Elemento=substring (Pezzo,1,i-1) //Estraggo l'elemento dalla stringa
NowX=initX + (10 * (Numero-1)) //Modifico di volta in volta le coordinate
NowY=initY + (Altezza * (Numero-1))
if (Numero>0){
_root.createEmptyMovieClip ("MoviePrima",1)
} //Il clip lo creo solo una volta
_root.MoviePrima.createTextField("Label"+i,i,NowX, NowY,Larghezza,Altezza);
EP="_root.MoviePrima.Label"+i;
// CEP = eval("_root.MoviePrima")
// CEP.createTextField("Label"+i,i,NowX,NowY,Larghezz a,Altezza);
//EP=eval("CEP.Label"+i)
EP.text="+" + Elemento //Scrivo il testo
StringaEst=substring(StringaEst,i+1,leng
th(StringaEst)-(i-1)) //Modifico La stringa esterna
i=0 //Ripristino l'indice
}
}
//Fine ciclo While. Aggiungo il file
NowX=initX + (10 * (Numero+1))
NowY=initY + (Altezza * (Numero+1))
file = StringaEst
_root.MoviePrima.createTextField("file"+NFile,i,No wX,NowY,Larghezza,Altezza);
EP="_root.MoviePrima.file"+NFile;
// CEP = eval("_root.MoviePrima")
// CEP.createTextField("file"+NFile,i,NowX,NowY,Largh ezza,Altezza);
//EP=eval("CEP.file"+NFile)
EP.text="+" + file
}
_root.Prova ("Dir1TDir2TDir3TFile.aaa") //Richiamo la funzione mandando la stringa path (non riesco a mettere il carattere "/")
P.S. Ieri ho sbagliato ed ho mandato questo post come se fosse un'altro nuovo post :rollo: