Little question: set color in form

[hstijnen]

I've made the following code to set a color for alle edit fields in a form:

TComponent *cp;
int nc = ComponentCount;
for (int i=0; i<nc; i++) {
cp = Components;
if(cp->InheritsFrom(__classid(TCustomEdit)))
((TCustomEdit*)cp)->Color = clBtnFace;
}

Got compile error in last line:
TControl::Color is not accessible.

What's wrong?

 

[itsgsd]

In order to do this with all edit fields. use TEdit, not TCustomEdit. TCustomEdit is the base class for several components:

  TComponent *cp;
  int nc = ComponentCount;
  for (int i=0; i<nc; i++)  {
    cp = Components[i];
    if(cp->InheritsFrom(__classid(TEdit)))
      ((TEdit*)cp)->Color = clBtnFace;
  }