Método Add(s) de TStringList no me hace caso

[david.rguez]

Hola a todos/as:

En un módulo de un programa tengo que utilizar un TStringList ya que tengo que mantener de forma dinámica una lista de claves de exclusión durante la ejecución del programa (para evitar que cierto proceso que tengo que hacer se duplique, generando basura en los resultados).

El caso es que cuando intento añadir un nuevo String a la lista:

lista.add(qtrazaTRAZA12.Value);

No hace ni caso. Es decir, no salta ningún error, pero la lista continúa vacía, con lo que se va al carajo el sistema de control que estoy montando para guiar el proceso.

El campo TRAZA12 al que hago referencia sí es un String y antes de usar la lista hago un create sobre la variable.

¿Alguien sabe por qué no hace nada?

[[maeyanes]]

Y estás seguro que esa línea se ejecuta?

A lo mejor el compilador la elimina por que no le encuentra relevancia...

Pon un breakpoint en esa linea (F5) y compila tu programa, si el breakpoint sigue activo, ejecuta el programa y ve que sucede antes y despúes de esa línea...


Saludos...

[luisgutierrezb]

y si usas un cast?
lista.add(string(qtrazaTRAZA12.Value));

o incluso no se si puedas hacer esto:
lista.add(qtrazaTRAZA12.AsString);

o ya de plano:
stringTemp := qtrazaTRAZA12.Value;
lista.add(stringTemp);

[jachguate]

De verdad, no me la creo!!!

Nunca he visto a un StringList fallar de esta manera. Creo que la línea de código no está ejecutándose, quizás porque las condiciones no se dan para que pase por allí. Estoy seguro que el optimizador no eliminaría una línea como esta.

Otra posibilidad es que estes determinando erroneamente que la línea no se añade, pero que realmente si lo hace. Ambas cosas son fáciles de determinar:

Código Delphi [-]
Lista.Add(qTrazaTRAZA12.Value);
ShowMessage(Lista.Text);

Si se muestra el mensaje, el código se está ejecutando. Si el mensaje mostrado es distinto del valor del campo, sigamos echandole la culpa al StringList, si no, busquemos al verdadero culpable!!.

Hasta luego.

[david.rguez]

LA línea sí llega a ejecutarse. Puse puntos de depuración lo primero para corroborarlo y sí llega ahí sin dar problemas.

Sin embargo, no hace nada, tras pasar esa línea el depurador me indica que la lista continúa vacía (no he puesto ShowMessage, lo consulté desde un estado de parada en depuración).

Ya he probado otros modos que me comentasteis como el AsString y el cast, pero el resultado es el mismo

[jachguate]

¿Cómo estas comprobando que la lista está vacía?

[ixMike]

¿Podemos ver el código (no sólo una línea)?

[[Al González]]

Hola.

Empezado por david.rguez

...LA línea sí llega a ejecutarse...tras pasar esa línea el depurador me indica que la lista continúa vacía...

Entonces la única explicación razonable que queda (considerando no te has equivocado de lista), es que la expresión qtrazaTRAZA12.Value, devuelve una cadena vacía en ese momento. ¿Estará ese campo vacío? (campo en blanco en el registro actual, cero registros en el conjunto de datos por estar éste cerrado o filtrado...).

No dejes de respondernos sobre estas cuestiones, aún cuando hayas encontrado la solución.

Saludos.

Al González.

[jachguate]

Empezado por Al González

Entonces la única explicación razonable que queda (considerando no te has equivocado de lista), es que la expresión qtrazaTRAZA12.Value, devuelve una cadena vacía en ese momento. ¿Estará ese campo vacío?

Me temo Al, que si ese fuese el caso, la lista no estaría vacía, pues contendría una cadena vacía en su primer elemento.

Se que puede tomarse por un tecnicismo... tampoco creas que me estoy entrenando para abogado, pero francamente no es lo mismo.

Hasta luego.

[[Al González]]

Vaya que no es lo mismo. Mayor razón para que David responda a tu última pregunta con más precisión. Tú y yo sabemos lo que es una lista realmente vacía, pero en el sentido general un texto sin caracteres (visibles) es coloquialmente considerado como algo vacío. Mi sospecha va por esa línea de investigación.

Saludos.

Al González.