Ver Mensaje Individual
  #3  
Antiguo 02-05-2008
santus santus is offline
Miembro
 
Registrado: ene 2006
Posts: 130
Reputación: 19
santus Va por buen camino
Cita:
Empezado por maeyanes Ver Mensaje
Hola...

Primero, recuerda que existen las etiquetas [ delphi ] [ /delphi ] (sin los espacios en blanco) para publicar código fuente en Delphi.

Sobre tu inquietud, bueno, existen varias formas de hacerlo...

Por ejemplo, todos los tipos de componente que usas heredan de TWinControl, entonces tu código puede quedar más o menos así:

Código Delphi [-]for I := 0 to Pred(ComponentCount) do if (Components[i] is TWinControl) and (TWinControl(Components[i]).Color = clRed) then begin ShowMessage('Falta completar datos... ');
b := 1
end


Ahora, existe otra posibilidad y es usando RTTI (Runtime Type Information). Puedes buscar mucha información sobre RTTI tanto en la web como en el foro...


Saludos...
Hola maeyanes ..

perdon que me meta. La verdad que vi interesante tu planteo. El tema es que lo intenté probar en mi delphi 2007 y no funciona!!

a la linea:

Código Delphi [-]
TWinControl(Components[i]).Color


me tira el siguiente error:

[DCC Error] Unit2.pas(31): E2362 Cannot access protected symbol TControl.Color

Se me ocurre que con el delphi 2007 esto no anda??.. alguna idea??.. es curiosidad nomas...

muchas gracias. Saludos.
__________________
"El ordenador nació para resolver problemas que antes no existían." Bill Gates.
Responder Con Cita