2 shan915135210 shan915135210 于 2013.12.02 19:17 提问

Delphi 求高手帮代码改正

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 错误,这个怎么改

2个回答

fsjvip
fsjvip   2013.12.03 17:18
已采纳

你要把整个文档贴上来.
PIndividualInfo in 'PIndividualInfo.pas' {FIndividual},
哈哈,最后一句,后面应该是分号

shan915135210
shan915135210 非常感谢!
4 年多之前 回复
fsjvip
fsjvip   2013.12.03 14:09

你要把整个文档贴上来

shan915135210
shan915135210 以上传。麻烦帮看下。有些窗体是通过添加进工程的
4 年多之前 回复
Csdn user default icon
上传中...
上传图片
插入图片
准确详细的回答,更有利于被提问者采纳,从而获得C币。复制、灌水、广告等回答会被删除,是时候展现真正的技术了!
其他相关推荐
Delphi 名站以及高手Blog
http://cnblogs.com/del (万一兄的,这个不用解释了) http://www.cnblogs.com/del/archive/2010/04/25/1720750.html  万一的博客总目录(2007.11.12 - 2010.4.25) http://cnblogs.com/dxsoft (不得闲,很多原创,但现在不怎么更新了) http://blog.c
5个帮你改掉坏习惯的方法
习惯会在不知不觉中影响人的行为。假如你在看电影时有吃爆米花的习惯,不管手边的爆米花好不好吃,你都会吃一些,但是如果规定习惯用右手的人必须用左手去吃爆米花,那他吃掉的爆米花会比平时少。这是德克萨斯大学心理学教授阿特·马尔科曼(Art Markman)所做的一个实验,他也是畅销书《聪明思考》(Smart thinking)的作者。 习惯的力量在于:在一个熟悉的环境里,你不需要思考,习惯能够自动触发。
寻幽谷delphi教程目录和下载地址
寻幽谷delphi新手到高手教程48(完结) [37:42] 寻幽谷delphi新手到高手教程47(数据库操作06) [34:56] 寻幽谷delphi新手到高手教程46(数据库操作05) [55:38] 寻幽谷delphi新手到高手教程44(数据库操作03) [23:46] 寻幽谷delphi新手到高手教程45(数据库操作04) [27:16] 寻幽谷delphi新手到高手教程43(数据库操作02) [31:28] 寻幽谷delphi新手到高手教程42(数据库操作01) [17:28] 寻幽谷delphi新手到高手教程41(函数小练习) [27:38] 寻幽谷delphi新手到高手教程40(完善第一个函数) [09:00] 寻幽谷delphi新手到高手教程39(认识函数) [24:58] 寻幽谷delphi新手到高手教程38(二维数组实例练习) [24:36] 寻幽谷delphi新手到高手教程37(二维数组02) [27:16] 寻幽谷delphi新手到高手教程36(二维数组01) [14:16] 寻幽谷delphi新手到高手教程35(数组操作02) [24:09] 寻幽谷delphi新手到高手教程34(数组操作01) [09:38] 寻幽谷delphi新手到高手教程33(趣味程序之我爱寻幽谷) [16:19] 寻幽谷delphi新手到高手教程32(完成屏幕女鬼编写) [46:10] 寻幽谷delphi新手到高手教程31(趣味程序之屏幕女鬼04) [40:45] 寻幽谷delphi新手到高手教程30(趣味程序之屏幕女鬼03) [01:00:03] 寻幽谷delphi新手到高手教程29(趣味程序之屏幕女鬼02) [33:57] 寻幽谷delphi新手到高手教程28(趣味程序之屏幕女鬼01) [43:29] 寻幽谷delphi新手到高手教程27(中秋节小程序) [23:12] 寻幽谷delphi新手到高手教程26(完成登陆器的编写) [16:12] 寻幽谷delphi新手到高手教程25(文件操作之登陆器模拟0... [29:22] 寻幽谷delphi新手到高手教程24(文件操作之登陆器模拟0... [38:36] 寻幽谷delphi新手到高手教程23(文件操作之登陆器模拟0... [26:43] 寻幽谷delphi新手到高手教程22(文件操作之登陆器模拟0... [46:40] 寻幽谷delphi新手到高手教程21(文件操作2-2) [16:00] 寻幽谷delphi新手到高手教程20(文件操作2-1) [29:11] 寻幽谷delphi新手到高手教程19(文件操作1) [28:33] 寻幽谷delphi新手到高手教程18(完成记事本的编写) [12:04] 寻幽谷delphi新手到高手教程17(记事本的编写05) [43:00] 寻幽谷delphi新手到高手教程16(记事本的编写04) [38:00] 寻幽谷delphi新手到高手教程15(记事本的编写03) [23:11] 寻幽谷delphi新手到高手教程14(记事本的编写02) [41:10] 寻幽谷delphi新手到高手教程13(记事本的编写01) [13:00] 寻幽谷delphi新手到高手教程12(记事本的编写流程介绍) [34:06] 寻幽谷delphi新手到高手教程11(完成发泄工具的编写) [31:20] 寻幽谷delphi新手到高手教程10(窗口背景的选择和发泄工... [59:22] 寻幽谷delphi新手到高手教程09(抠图和声音剪辑工具使用... [33:42] 寻幽谷delphi新手到高手教程08(发泄工具编写01) [27:19] 寻幽谷delphi新手到高手教程07(发泄工具编写流程) [49:45] 寻幽谷delphi新手到高手教程06-2(www.xunyougu.com).a... [23:12] 寻幽谷delphi新手到高手教程05(www.xunyougu.com) [04:56] 寻幽谷delphi新手到高手教程06(www.xunyougu.com) [42:27] 寻幽谷delphi新手到高手教程04(www.xunyougu.com) [25:31] 寻幽谷delphi新手到高手教程03(www.xunyougu.com) [28:20] 寻幽谷delphi新手到高手教程02(www.xunyougu.com) [43:06] 寻幽谷delphi新手到高手教程01(www.xunyougu.com) [16:20]
《Delphi高手突破》的前言部分,太精采了
简单性是这个世界上最难获得的东西:它是经验的最终界限,也是天才的最终努力目标。--George Sand  您已经是一位熟练的Delphi程序员,可以运用Delphi快速地写出一个漂亮、实用的程序;您热爱Delphi;她已经成了您工作、学习中不可或缺的一部分。我假设这些都为真,那么您当初选择Delphi作为自己的首选开发工具一定有自己的理由或者原因。  至少,我自己是符合以上的所有假设的。
游戏外挂高手合作征求
本人是工作室,先预在这里诚招外挂制作高手!以便本工作室带练之用!本人主要在淘宝做生意!淘宝店铺地址shop33763440.taobao.com〈钻石信誉〉拉面大叔   qq260490707或者717670680  请著名原因我好分类!再此欢迎您的光临!有什么经验可以交流不诚心为了骗钱的人请不要加了!谢谢!不要浪费大家的时间!为了方便大家交流!交易方便欢迎大家加群35132227 著名原
求高手帮编下matlab程序,
用潮流追踪方法计算网损分摊,IEE14节点算例,哪位大哥会编请联系我,有兴趣的也联系我,
Delphi高手突破(官方版).pdf
delphi进阶之书,对象是有一定的编程基础,这本书有助于提高你delphi网络编程水平
Delphi高手突破 (官方版) 2M
非常经典的著作!Csdn号:saien
《Delphi高手突破》完整版
本书籍是适合于已经掌握delphi开发工具,但想在这个领域“突破”的delphier.包括深入认识delphi,吃透面向对象编程理论基础,掌握异常及错误处理,更深入学习VCL原理及使用。熟练使用指针等知识点,保证您不看不知道,一看忘不了
用递归来求阶乘的小程序(delphi版)
用了delphi 这么长时间,一直做数据库程序,没有做过什么算法,今天做了一个最简单的求阶乘的例子,用的是递归的方法,程序如下procedure TForm1.Button2Click(Sender: TObject);  function jc(i:integer):integer;  begin    if i>1 then      result:=i*jc(i-1);  end;var