Hola:
Creo que el código es bastante específico para lo que preguntas, pero faltó decirte que para utilizar el objeto TIniFile debes incluir en el uses la unit IniFiles (esta información la da también la ayuda de Delphi, en la ayuda de cada clase aparece la unit donde se declara). No es reacsection sino ReadSection, ésto venía bien en el código que te puse.
Result: ahí metí la pata porque no pinta nada esa variable dentro de un procedure, y además el método ReadSection no devuelve ningún valor. Lo correcto es:
ReadSection ('ANIMALES', ListaAnimales); // a secas
y
ReadSection ('ANIMALES', ListBox1.Items); // a secas
Mira a ver si ahora te funciona. Voy a corregirlo en el mensaje anterior para que quede más claro.
|