【动态创建事件过程改变动态创建的控件问题】

unit unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Dyn_ButtonClick(Sender: TObject);
    procedure Create_Form(AOwner: TComponent);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
  Dyn_Form: TForm;
  Dyn_button: TButton;
  Dyn_label: TLabel;
implementation{$R *.dfm}
                     
procedure TForm1.Dyn_ButtonClick(Sender: TObject);
begin
  Dyn_Form.Dyn_label.Caption:='停止';
end;procedure TForm1.Create_Form(AOwner: TComponent);
begin  if assigned(Dyn_Form) then exit;
  Dyn_Form:= TForm.Create(AOwner);
  with Dyn_Form do
  begin
    try
      Dyn_button := TButton.Create(Dyn_Form);
      with Dyn_button do
      begin
        Parent := Dyn_Form;
        onclick:=Dyn_ButtonClick;
      end;
      Dyn_label := TLabel.Create(Dyn_Form);
      with Dyn_label do
      begin
        top:=50;
        Parent := Dyn_Form;
        caption:='开始';
      end;
    except
    end;
  end;end;procedure TForm1.Button1Click(Sender: TObject);
begin
  Create_Form(nil);
  Dyn_Form.Show;
end;end.
 编译时提示错误：
[Error] Unit1.pas(32): Undeclared identifier: 'Dyn_lable'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'请高手帮忙解决！！！