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;
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;