新人求教 begin 错误啊

Question

program Project1;uses
  Forms,
  Unit1 in 'Unit1.pas' {flogin},
  Unit2 in 'Unit2.pas' {DM: TDataModule},
  Unit3 in 'Unit3.pas' {fmian},
  Unit4 in 'Unit4.pas' {fpass},
  Unit5 in 'Unit5.pas' {adduser},
{$R *.res}begin
  Application.Initialize;
  Application.CreateForm(Tflogin, flogin);
  Application.CreateForm(TDM, DM);
  Application.CreateForm(Tfmian, fmian);
  Application.CreateForm(Tfpass, fpass);
  Application.CreateForm(Tadduser, adduser);
  Application.Run;
end.

Answer 1

你是调试或者构建的时候出现的吧，它不是在这里的错误，只是被包含在这里面，你应该看你的主窗口提示的什么或者你引用的单元提示的错误在哪里，而不是找begin的错误，因为你所运行的是被包含这个begin里面的

Answer 2

这里 Unit5 in 'Unit5.pas' {adduser}, 
把逗号改成分号
 Unit5 in 'Unit5.pas' {adduser};

Answer 3

Begin 之前的语句未结束，应该在第名结果尾次“，”改为“；”。
program Project1;uses
  Forms,
  Unit1 in 'Unit1.pas' {flogin},
  Unit2 in 'Unit2.pas' {DM: TDataModule},
  Unit3 in 'Unit3.pas' {fmian},
  Unit4 in 'Unit4.pas' {fpass},
  Unit5 in 'Unit5.pas' {adduser};{$R *.res}begin
  Application.Initialize;
  Application.CreateForm(Tflogin, flogin);
  Application.CreateForm(TDM, DM);
  Application.CreateForm(Tfmian, fmian);
  Application.CreateForm(Tfpass, fpass);
  Application.CreateForm(Tadduser, adduser);
  Application.Run;
end. 

Answer 4

Begin 之前的语句未结束，应该在第9句结果尾“，”改为“；”。