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

Question

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

Answer 1

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;

Answer 2

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;