program Project1;
uses
Forms,
PMain in 'PMain.pas' {FMain},
PStudent in 'PStudent.pas' {FStudent},
DataMdl in 'DataMdl.pas' {DataMdlSystem: TDataModule},
PCourse in 'PCourse.pas' {FCourse},
PCourseAdd in 'PCourseAdd.pas' {FCourseAdd},
PGrade in 'PGrade.pas' {FGrade},
PLoad in 'PLoad.pas' {FLoad},
PSelectCourse in 'PSelectCourse.pas' {FSelectCourse},
PGradeAdd in 'PGradeAdd.pas' {FGradeAdd},
PCourseEdit in 'PCourseEdit.pas' {FCourseEdit},
PUserRight in 'PUserRight.pas' {FUserRight},
PShare in 'PShare.pas',
PUser in 'PUser.pas' {FUser},
PRole in 'PRole.pas' {FRole},
PFunction in 'PFunction.pas' {FFunction},
PChangePSW in 'PChangePSW.pas' {FChangePSW},
PTeacher in 'PTeacher.pas' {FTeacher},
PIndividualInfo in 'PIndividualInfo.pas' {FIndividual},
//Unit8_ex2 in '....\Delphi\Unit8_ex2.pas' {Form1};
{$R *.res}
begin
Application.Initialize;
Application.Title := '學生宿捨管理系統';
Application.CreateForm(TDataMdlSystem, DataMdlSystem);
Application.CreateForm(TFMain,FMain);
//Application.CreateForm(TFStudent,FStudent);
Application.Run;
end.
提示Identifier expected but 'BEGIN' found 錯誤,這個怎麼改
你要把整個文檔貼上來.
PIndividualInfo in 'PIndividualInfo.pas' {FIndividual},
哈哈,最後一句,後面應該是分號