Ver Mensaje Individual
  #2  
Antiguo 22-07-2008
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Reputación: 30
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
En ese caso, en lugar de Components y ComponentCount, utiliza las propiedades Controls y ControlCount, respectivamente, con las cuales no necesitarás hacer ningún molde de tipo.

El único problema de esta solución es que no cambiará el título de los controles que estén dentro de otros controles, a menos que realices llamadas recursivas sobre el arreglo Controls de cada componente TWinControl del formulario.

Espero te sirva de orientación.

Saludos.

Al González.

P.D. EDITO: Aún puedes usar Components y ComponentCount preguntando en el If si el componente es un TControl (en lugar de TLabel). Pero para cualquiera de las dos soluciones deberás tener en cuenta que Caption es una propiedad protegida a nivel de TControl, por lo que puede resultarte necesario hacer lo que se conoce como "molde de acceso" declarando una clase hija de TControl y usarla en el "type cast" que haces.

Última edición por Al González fecha: 22-07-2008 a las 02:19:22.
Responder Con Cita