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...