Buenas de nuevo, creo que el problema viene porque los componentes son DBEdit, si son Edit normales si funciona.
Como declaro esto, pero para un DBEdit?
Código Delphi
[-]if (Componente is TCustomEdit) then (Componente as TEdit).Color := Color;
Saludos
Josep