Cambiar la propiedad Caption de etiquetas TLabels en runtime mediante bucle for.

[ecfisa]

Hola Yugo.

Empezado por Yugo

...
Otra cosa ecfisa, al inicializar la variable i del bucle for a i=0, también podríamos haberla inicializado a i=1 cuando el nombre de la primera etiqueta es Label1. ¿No?

En realidad el índice de la propiedad vectorial Components tiene un rango que va de cero a ComponentCount-1, es decir que si lo que deseas buscar es "Label1" en adelante, es mejor acostumbrarse a hacer:

  for(int i=0; i<ComponentCount; i++) {
    CP = FindComponent("Label" + IntToStr(i+1));

Justo en este ejemplo (usando FindComponent) no importa si hacemos:

  for(int i=1; i<=ComponentCount; i++)

Pero fijate que en este caso:

{
  for(int i=1; i<=ComponentCount; i++)
    if (Components[i]->ClassNameIs("TLabel"))
      (static_cast<TLabel*>(Components[i]))->Color = clRed;
}

obtendríamos un error de índice fuera de rango...


Saludos