Tema: Componente En Tiempo De Ejecucion
Ver Mensaje Individual
  #12  
Antiguo 30-04-2008
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
  
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
jop 

Código Delphi [-]
for i:= 0 to Form1.ComponentCount-1 do
if Component[i] is TLabel then 
with TLabel(component[i]) do
 if todos then
    Color :=  $00549CCD // todos
  else
    Color := $00F4F4F4; // Ninguno

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita