Changing TextColor

Hi all,

Is it possible to change the textcolor property for the entire screen in a single loop? I tried:

dim c as integer
dim obj as control

for c = 0 to self.ControlCount - 1
if right(self.Control©.name, 4) = “_col” then //I specifically labelled the field that requires to change color
obj = self.Control©
obj.color =
end if

However, there is no textcolor property for Control. Any ideas?

ok, i got it

for c = 0 to self.ControlCount - 1 if right(self.Control(c).name, 4) = "_col" then obj = self.Control(c) if obj isa TextField then textfield(obj).textcolor = end if end if next