有什么语句可以同时设定多个控件的属性

Question

FORM上有8个EDIT控件，我要设置他们其中的任何一个属性（比如ENABLED属性）
如果写8句分别指定的话，太累赘了，有没有像VFP里面那种SETALL指令，可以设置FORM上同一个类的控件的属性

Answer 1

for i:=0 to ComponentCount-1 do
begin
  if Components[i] is Tedit then
    Tedit(Components[i]).enabled:=false;

Answer 2

好像没有
with form1 do 
for i:=0 to componentcount-1 do 
  if (components[i] is TEdit) then
    (components[i] is TEdit).enabled:=true

Answer 3

 for i:=0 to form.componentcount-1 do 
  if (form.components[i] is TEdit) then
    (form.components[i] as TEdit).enabled:=true

Answer 4

for i:=1 to 8 do
 TEdit(Form1.FindComponent('Edit'+IntToStr(i))).Text:='';

Answer 5

同意上面各位
for i:=0 to form.componentcount-1 do 
  if (form.components[i] is TEdit) then
    (form.components[i] as TEdit).enabled:=true