[Ralevi]

Buenas, sigo experimentando.

Creo un form con varios Label y SpinBox, y uso Tlist para manejarlos.

Este es mas o menos el sistema:

Código Delphi [-]
   //----------------------------------------------------------------------------------------------------------------
   procedure ElProgramaX.FormCreate(Sender: TObject);

   Var
   Lista1,Lista2:Tlist;  
   Espin:TSpinBox;
   etiqueta:tlabel;
   x,idx1,idx2:integer;

   begin

   Lista1:=Tlist.Create;

   idx1:=Lista1.Add(label1);
   /...  Añado todos los Label 
   idx1:=Lista1.Add(labe20);

   Lista2:=Tlist.Create;

   idx2:=Lista2.add(SpinBox1);
   // ... Añado los TSpinBox
   idx2:=Lista2.add(SpinBox20);

   //Cargo Los Label desde un  Memo
   for x := 0 to MEMO1.Lines.Count-1 do
     begin
     Etiqueta:=Lista1.items[x];
     Etiqueta.Text:=MEMO1.LINES[X];
     end;
 
   // Aqui asigne los valores solo para comprobar el orden y que funcionaba 
   for x := 0 to MEMO1.Lines.Count-1 do
     begin
     Espin:=Lista2.items[x];
     Espin.value:=x;
     end;

   end;
   //----------------------------------------------------------------------------------------------------------------

En principio funciona bien, las consultas son:

-La estoy liando y hay métodos mas sencillos??

-La variable idx tiene que ser diferente para cada List o si le asigno valor 0 antes de asignar la segunda valdría?

-Como todas las variables se declaran en el procedimiento FormCreate no se podrá acceder a los datos desde otra parte del código. ¿Se podria declarar en un procedimiento externo?

Gracias anticipadas.