循环遍历窗体里面每一个Edit

Question

循环遍历窗体里面每一个Edit如果控件类型是edit就让他们的Text属性为空，
还有就是用一个“循环”判断窗体里面所有edit是否全不为空多谢！！！

Answer 1

for temp:=0 to FORMNAME1.ComponentCount-1 do
           begin
           if Components[temp] is tedit then 
              if  tedit(components[temp]).text='' then
                   showmessage('空');
           end;

Answer 2

For i:=0 to ComponentCount-1 Do
           begin
           if Components[i] is TEdit then 
              (Components[i]as TEdit).Text='' then
                   ...    //操作
           end;