怎样一起清空面板上或GROUPBOX上所有输入控件的TEXT

[gmxlj]

我的面板上有PANNEL，上面放了GROUPBOX ，GROUPBOX上面有很多输入型控件，像EDIT和COMBOBOX。怎么样才能一起把他们的TEXT清空呢，要源码。在线等。

[gmxlj]

急急急。希望各位大峡帮忙

[CloneCenter]

for i := 0 to GroupBox1.ControlCount -1 do
begin
if GroupBox1.Controls[i] is TEdit then
TEdit(GroupBox1.Controls[i]).Text := '';
if GroupBox1.Controls[i] is TComboBox then
TComboBox(GroupBox1.Controls[i]).Text := '';
end;

[fhuibo]

for i := 0 to GroupBox1.ControlCount -1 do
begin
if GroupBox1.Controls[i] is TEdit then
TEdit(GroupBox1.Controls[i]).Text := '';
if GroupBox1.Controls[i] is TComboBox then
TComboBox(GroupBox1.Controls[i]).Text := '';
end;