delphi 窗体重新构建或者说是恢复到刚打开时的样子

Question

我的窗体上有很多控件，都是那些输入的。现在想在窗体上弄个清空按钮，按钮按下就把修改过的内容全部还原到本来的样子
我不想用xxx.text:=xxx。这个写起来一大堆。我想请教哪位大侠，帮忙给个窗体重新构建的代码。
有个参考代码是Form1.onshow(self),但没效果。我吃个饭回来，希望问题已解决，谢谢！！！补充：清空按钮在要重建（重置）窗体上了

Answer 1

关掉这个窗口再打开就是了，打开的时候给他显示个loading窗口，假装你是在还原

Answer 2

procedure TForm1.ReloadForm;
var i : Integer;
begin
  Hide;
  try
    for i:=ComponentCount-1 downto 0 do
      RemoveComponent(Components[i]);
    InitInheritedComponent(Self, TForm);
  finally
    Show;
  end;
end;

Answer 3

不懂，我是DELPHI初学者，你的代码放到我按钮触发事件里吗？
你还给个你所表达意思的代码，要按钮触发事件的。