Trabajar con Label1, Label2, ..., Labeln dentro de un bucle

[roman]

¿Y si "lo que sea" depende del número de label?

// Saludos

[*Caro*]

Empezado por roman

¿Y si "lo que sea" depende del número de label?

// Saludos

Entonces utilizamos la propiedad Tag del Label.

Código Delphi [-]
for i:=0 to ComponentCount -1 do
  If (Components[i] Is TLabel) Then
   Case TLabel(Components[i]).Tag of
    1: TLabel(Components[i]).Caption := 'ponemos algo para tag 1';
    2: TLabel(Components[i]).Caption := 'ponemos algo para tag 2';
    3: TLabel(Components[i]).Caption := 'ponemos algo para tag 3';
    .........
   end;

Claro que antes colocando su repectivo número en la propiedad tag de cada label.

Saluditos