Indice incorrecto
Hola,
haber si alguien me puede explicar porque este codigo, despues de correr, me indica "indice incorrecto". Este el el codigo: Código:
var Alguien me puede explicar porque, porque no lo entiendo, gracias de antemano |
Y por qué en lugar de
Código:
TreeView1.Items[J].Selected := True; Código:
TreeView1.Items[J].Delete; PD: te aconsejo el uso de la etiqueta CODE para poner código |
Aun me sale el error
Pues tambien tienes razon, para que poner dos lineas de codigo si con una me hace lo mismo. Pero me sigue saliendo el mismo error "Indice invalido".
Código:
If Cadena = TreeView1.Items[J].Text Then |
Bueno, el error te lo marca por culpa del bucle for. Es decir, tu incrementas el contador J hasta TreeView1.Items.Count - 1, que en un bucle for (si no voy equivocado) lo tomará como una constante (5, 6, 7, los que sean). Al hacer un delete durante la iteración del mismo, llega un momento en que te pasarás de rango.
Cambia el bucle for por uno while (en el que, por cada iteración, se evaluará la expresión) y nos comentas. PD: bien por la etiqueta CODE!!! ;) |
bucle while
cadetill, pues si te digo la verdad no tengo ni idea de como ponerlo en un bucle while, porque qeu le pongo:
Código:
while cadena = TreeView1.Items.Item[J].Text Do Código:
while Cadena <> TreeView1.Items.Item[J].Text Do Asi que nano, no tengo ni puta idea de como resolver este problemilla, si me hechases una mano te lo agradeceria un monton, y eso sin contar lo que habre aprendido con esa manilla que me has hechao, sea lo que sea muchas gracias por tu interes |
Prueba a realizar el bucle en sentido inverso, es decir, empenzado por el último elemento.
|
Bueno, puedes probar tambien lo que comenta jplj, es decir
Código:
for j := TreeView1.Items.Count - 1 downto 0 to Código:
J := 0; |
agradecimiento
Muchas gracias a los dos.
Como habreis comprovado soy un pardillo en esto, asi que no sabeis los quebraderos de cabeza que tenia ya con esto, gracias nuevamente :D |
gracias
Cita:
gracias jplj por tu consejo, va a la perfeccion |
La franja horaria es GMT +2. Ahora son las 05:29:48. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi