这些错误是怎么回事?请各位帮忙

代码如下:
program gzglxt;uses
  Forms,
  main in 'main.pas' {Main_Form},
  login in 'login.pas' {Login_Form},
  usergl in 'usergl.pas' {usergl_Form},
  password in 'password.pas' {password_Form},
  yggl in 'yggl.pas' {yggl_Form},
  ygxx in 'ygxx.pas' {ygxx_Form},
  setzw in 'setzw.pas' {setzw_Form},
  setzc in 'setzc.pas' {setzc_Form},
  setother in 'setother.pas' {setother_Form},
  addgzb in 'addgzb.pas' {addgzb_Form},
  gzgl in 'gzgl.pas' {gzgl_Form},
  modigz in 'modigz.pas' {modigz_Form},
  gztj in 'gztj.pas' {gztj_form},{$R *.res}
begin
  Application.Initialize;
  Application.CreateForm(Tlogin_Form,login_Form);
  login_Form.ShowModal;
  //判断是否通过系统验证
  if login_Form.loginok then
  begin
    login_Form.Free;
    Application.CreateForm(TMainForm,MainForm);
    Application.Run;
  end
  else
    Application.Terminate;
end.
[Error] gzglxt.dpr(20): Identifier expected but 'BEGIN' found
[Error] gzglxt.dpr(21): Undeclared identifier: 'Application'
[Error] gzglxt.dpr(21): Missing operator or semicolon
[Error] gzglxt.dpr(22): Missing operator or semicolon
[Error] gzglxt.dpr(22): Undeclared identifier: 'Tlogin_Form'
[Error] gzglxt.dpr(22): Undeclared identifier: 'login_Form'
[Error] gzglxt.dpr(23): Missing operator or semicolon
[Error] gzglxt.dpr(25): 'THEN' expected but identifier 'loginok' found
[Error] gzglxt.dpr(27): Missing operator or semicolon
[Error] gzglxt.dpr(28): Missing operator or semicolon
[Error] gzglxt.dpr(28): Undeclared identifier: 'TMainForm'
[Error] gzglxt.dpr(29): Missing operator or semicolon
[Error] gzglxt.dpr(32): Missing operator or semicolon