登录窗口中的主窗口问题！！

主窗口
uses Unit1;{$R *.dfm}
procedure   TfrmMain.FormShow(Sender:   TObject);
  var
      Monitor:                TRouletteMonitor;
      UserName:               string;
      CurrentUserName:        string;
      Password:               string;
      loginOk:     boolean;
  label
  LoginAgain;
  begin
      LoginAgain:
      if   frmLogin.ShowModal   =   mrCancel   then
      begin
          if   not   LoginOK   then
          Close
      end
      else
      begin
          Monitor   :=   TRouletteMonitor.Create;
          Monitor.ADOConnection   :=   ADOConn1;          UserName   :=   Trim(frmLogin.edtUserName.Text);
          Password   :=   Trim(frmLogin.edtPassword.Text);
          if   Monitor.Login(UserName,   Password)   then
          begin   
              LoginOK   :=   True;
              CurrentUserName   :=   frmLogin.UserName;
              StatusBar1.Panels[3].Text   :=   '登录：'   +   CurrentUserName;
              frmLogin.edtUserName.Text   :=   '';       //TODO..   Last   Login   UserName   from   Registry
              frmLogin.edtPassword.Text   :=   '';              EnableThingsAfterLogin;
          end
          else   
          begin
              if   not   LoginOK   then   StatusBar1.Panels[3].Text   :=   '登录：未登录';   
              MessageBox(frmLogin.Handle,   '登录不成功，请确认用户名和密码都正确。',   '登录',   MB_OK   +   MB_ICONERROR);   
              frmLogin.edtPassword.Text   :=   '';   
              frmLogin.edtUserName.SelectAll;   
              goto   LoginAgain;   
          end;   
    
          Monitor.Free;   
      end;   
  end;   end.[Error] Unit2.pas(30): Undeclared identifier: 'TRouletteMonitor'
[Error] Unit2.pas(46): Missing operator or semicolon
[Error] Unit2.pas(47): Missing operator or semicolon
[Error] Unit2.pas(47): Undeclared identifier: 'ADOConn1'
[Error] Unit2.pas(51): 'THEN' expected but identifier 'Login' found
[Error] Unit2.pas(54): Undeclared identifier: 'UserName'
[Error] Unit2.pas(59): Undeclared identifier: 'EnableThingsAfterLogin'
[Error] Unit2.pas(70): Missing operator or semicolon
[Fatal Error] Project2.dpr(6): Could not compile used unit 'Unit2.pas'
请大家帮帮忙！！详细一点有用都什么控件？