1004.NN校园综合信息管理系统的设计与开发.doc

上传人:laozhun 文档编号:2398930 上传时间:2023-02-17 格式:DOC 页数:51 大小:457.50KB
返回 下载 相关 举报
1004.NN校园综合信息管理系统的设计与开发.doc_第1页
第1页 / 共51页
1004.NN校园综合信息管理系统的设计与开发.doc_第2页
第2页 / 共51页
1004.NN校园综合信息管理系统的设计与开发.doc_第3页
第3页 / 共51页
1004.NN校园综合信息管理系统的设计与开发.doc_第4页
第4页 / 共51页
1004.NN校园综合信息管理系统的设计与开发.doc_第5页
第5页 / 共51页
点击查看更多>>
资源描述

《1004.NN校园综合信息管理系统的设计与开发.doc》由会员分享,可在线阅读,更多相关《1004.NN校园综合信息管理系统的设计与开发.doc(51页珍藏版)》请在三一办公上搜索。

1、哈 尔 滨 商 业 大 学毕 业 论 文 说 明 书(论 文)毕 业 设 计(论文)题目 校园综合信息管理系统的设计与开发 指 导 教 师 2005年6月17日哈 尔 滨 商 业 大 学毕 业 设 计(论 文)审阅 评 语一、指导教师评语指导教师签字:年 月 日二、评阅人评语评阅人签字:年 月 日哈 尔 滨 商 业 大 学毕 业 设 计(论 文)答 辩 评 语 及 成 绩三、答辩委员会评语四、毕业设计(论文)成绩 盖章:五、答辩委员会主任单位: 答辩委员会主任职称: 答辩委员会主任签字: 年 月 日校园综合信息管理系统的开发与设计摘 要主要阐述了使用面向对象程序开发工具delphi7.0和de

2、lphi本地数据库paradox开发设计的校园综合信息管理系统的全过程。分别介绍了该系统的开发思想,开发计划,可行性分析,调查分析,功能和结构设计以及系统功能的实现过程和最后对系统进行调试时产生的一些情况。其中还详细介绍了程序设计时所用到的基本算法。在本系统开发过程中还应用了TreeView控件分级显示数据和DBCtrlGrid分栏显示学生档案这两种开发工具。对于该系统设计者在进行开发时,力争使该系统具有界面友好,功能全面,操作简单等特点。关键词Paradox数据库;TreeView控件;DBCtrlGrid控件The Design and Development of the System

3、of college campus management AbstractThis text show how use the tool of the delphi7.0 with database paradox, make the campus manage system. Introduced the thought of the development of this system , about plan、possible、investigate the analysis, this function was designed with the construction and th

4、e system function, realizes process proceed to adjust the some circumstance that try with finally to the system produce. Among them return the detailed introducing the procedure design the hour a basic calculate way for using. Still applied in this system development process the TreeView control a r

5、atings manifestation data to divide with the DBCtrlGrid the column shows students file these two kinds of developments tool. Make this system have there rules, interface amity, function completely, operate simple etc. Keywords Paradox Database; TreeView Control Components; DBCtrlGrid Control Compone

6、nts 目 录摘 要IIAbstractIII1绪 论11.1课题研究的背景及意义11.2 国内外研究的动态21.3本文的工作21.4开发工具的讨论21.4.1开发工具的选择21.4.2 Delphi7.0的简介22 系统设计52.1系统结构图52.2 业务流程图62.3 数据库设计62.4关键技术113客户端的实现123.2 系统登陆界面设计123.3 学生交费数据录入窗口设计133.4 交费情况条件查询窗口设计223.5 职工档案报表浏览与打印293.6 费用标准维护设计294系统的调试与测试314.1 软件测试的目的314.2 软件测试依据的原则314.3 软件环境要求31结 论32参考

7、文献33致 谢34附录135附录2391 绪 论人类已经进入21世纪,我们的任务是建设面向21世纪的教育。信息技术对未来教育的影响不可估量,是今后几年教育发展的主旋律,并已正式列入国家教育事业发展目标。陈至立部长提出:推广和应用现代信息技术是深化教育改革,全面推进素质教育的“制高点”。在今天,以数字化技术与网络技术的信息技术的发展与应用,对教育产生重要的作用。“以信息化带动教育的现代化,努力实现基础教育的跨越式的发展。”1 课题研究的背景及意义问题的提出随着我国教育体制改革的深入进行,教育系统得到了前所未有的发展。校园管理正在逐步迈向管理信息现代化。但是,我国的校园管理信息化水平还处于初级阶段

8、,主要表现在对学生的交费管理,学生的档案管理,职工人事管理还是采用原有的人工管理方式。这就造成工作效率低,误差大,也造成了人力,物力,财力资源的浪费。与此同时,校园是培养国家栋梁之才的场所,无论是在教育,还是管理上都应走在最前列,而其中管理又是学校运转良好的关键。如何提高管理,是当前学校管理者所面临的重要课题。在当今的时代,网络技术与计算机软件技术已经愈来愈广泛地应用到教育系统中的各个方面。使用计算机管理系统不仅可以简化学校传统的管理模式,使学校管理人员能够方便地利用学校内部信息对学生档案,学生收费,职工人事进行全面管理,更重要的是使用计算机技术可以使校园管理规范化,制度化,数字化,提高管理水

9、平,降低管理成本,减轻工作强度,提高工作效率,使学校以高效率运转。计算机技术在校园中的应用顺应了我国的国情,实现了教育要面向现代化,面向未来的指导思想,是校园管理走向现代化的有利武器。2课题研究的意义黑龙江科技学院是一所培养科技人才的大学。该学院有教职员工500多人,学生10000多人。随着教育体制的改革和近两年大学扩招,该校的教学管理和学生收费管理越来越不适应学校的要求。该校领导层深切的意识到:信息技术的高速发展,信息的获取,传输,处理和应用能力将作为人们最基本的能力和文化水平的标志。以计算机技术,微电子技术和通信技术为特征的现代信息技术,已在社会各个领域中得到广泛应用,正在改变着人们的生产

10、与生活方式,工作与学习方式。国内各个大学都在积极发展信息技术,该校如不在信息技术方面加快发展,就会拉大与其他学校的差距。基于上面的因素,学校管理者决定在学生档案管理,学生收费管理,职工档案管理采用先进的计算机技术,提高管理水平。3根据该学校的具体情况,系统主要功能设计有:学生交费管理:交费数据录入,交费情况条件查询,交费情况浏览和查询,学生欠费情况浏览与统计,交费数据报表浏览与打印。学生档案管理:学生档案录入,学生档案统计,学生档案浏览与查询,学生档案条件式查询,学生档案报表浏览与打印。职工人事管理:职工档案录入,职工信息条件式查询,职工档案资料综合管理,职工档案报表浏览与打印。数据维护:维护

11、系名表,维护年级表,维护班名表,维护专业表,维护民族表,部门表维护,职务表维护,职称表维护,费用标准表,备份与恢复。系统功能:修改密码,用户信息,权限设置,使用提示,重新登陆。 1.2 国内外研究的动态随着我国信息化的大潮阵阵袭来,教育的信息化正受到越来越多人们的关注和重视。许多国内大学都已经拥有自己完善的信息管理系统,可以很好的提高工作效率,方便信息的查询,并且具有良好的安全性。纵观国外成功的运营多年的各类信息管理系统,有其成熟的经验可以借鉴。而当今计算机和网络技术的飞速发展则为我们提供了良好的条件。我国各类信息管理系统部门都拥有各自比较优秀的管理系统,他们都能很好的满足各类需求。我国的信息

12、管理系统有自己的特殊性,主要表现在以下几点:规模大、实时性强、管理业务量大、多级层次结构本系统的设计是根据当今各类信息管理系统的某些设计特点设计,并且争取做到界面更加人性化,操作简便,不影响速度。1.3 本文的工作经过一段时间的实地调研之后,得出本系统的主要任务:本系统利用计算机信息化技术对校园的综合信息进行现代化管理,以提高校园信息管理的工作效率为主要目标。主要正对学生和教职员工两方面进行管理,其中主要包括对学生的档案的管理,学生交费的管理和教职员工的档案的管理。1.4 开发工具的讨论1.4.1开发工具的选择目前,软件行业中主流的面向对象的开发工具有Delphi,Vc,Vb,PB等,从功能特

13、性,使用性,方便性等各个方面以及开发本系统所涉及的技术为基准进行考虑。最终选择Delphi7.0和Delphi本地数据库Paradox作为开发本系统的工具。1.4.2 Delphi7.0的简介Delphi是Borland公司推出的应用程序开发工具。它具有功能强大,易于学习和使用,编程效率高和易于调试等特点。Delphi是可视化应用变成开发环境,面向对象编程语言object Pascal,快速编译器和数据库编程工具等的完美结合。企业应用MDA开发。让开发者在根本上减少从设计到开发所需的编码数量和时间,从而加速应用开发过程。RAD可视Web开发。在Delphi7.0环境下,开发者能够进行可视Web

14、应用开发,它的应用模式(Application Mode)框架能够在切断与服务器连接的情况下进行透明的对话管理。内建Linux跨平台支持器。Delphi7.0装配Delphi语言版的Borland Kylix3。第一个高性能的可视集成开发环境(IDE),客迅速创建数据库,图形用户接口(GUI),Web和Linux操作系统的Web服务应用。企业型报告。可创建跨平台报告,帮助分析应用执行的效率。DataSnap是客户能够建立支持Web Services的高性能中间件,中间件使任何用户端应用程序或服务器都能通过行业标准Web Services和XML,DCOM或CORBA,与任何主流数据库轻松建立连

15、接。Windows XP应用。Delphi7.0支持XP主题,开发者可以利用Windows XP用户接口主题来开发应用。Delphi在分布式数据库开发中的优势有:1、Delphi支持的分布式开发技术有三种:分布式组件技术,分布式数据库技术,分布式Web技术,分布式组件技术用于大型的程序开发,分布式数据库技术用于开发大型数据库,分布式Web技术用于开发大型的网站,如电子商务。2、多层分布式数据库结构MIDAS是Borland公司开发分布式数据库的一个很重要的技术,它在分布式数据存储和更新中,都发挥了巨大的作用,在Delphi中可以实现的分布式结构有DCOM,CORBA等。3、在 Delphi中,

16、从应用服务器到客户端的开发都可以在Delphi中完成,并且实现过程也很方便,除了应用服务器之外,还可以加入用于控制安全的安全中间件和用于控制不同平台数据转换的转换中间件。4、在Delphi中创建一个简单的分布式数据库项目的步骤如下:一:创建一个新的项目作为应用服务器,然后把数据链路部分放到应用服务器上。二:建立一个客户端程序,客户端用TclientDataSet通过TremoteServer向服务器程序请求数据。Delphi数据库的体系结构有以下特点:1、Delphi使用可视化的部件创建数据库应用,跟创建其它的非数据库应用程序一样,数据库组件都具备一定的属性,程序设计人员可以在设计过程中设置部

17、件的多种属性,也可以在程序运行过程中通过程序来设置部件的各种属性。2、在Delphi部件板上有两页数据库组件用于开发数据库应用程序:3、数据访问部件页:该页上的组件主要用于说明有关的数据库的信息,如应用程序要访问(连接)的数据库,要访问数据库中的具体的数据库表,以及要访问表中哪些字段等,在实际的开发应用中常用的部件有TDataSource、TTable、TQuery等。4、数据控制部件页:该页上的组件主要用于显示浏览数据库中的数据信息,为用户提供了一个可视化的界面,常用的部件有:TDBGrid、TDBEdit、TDBCheck等,可以让用户对数据库中的信息进行有效的浏览、编辑、插入、删除等操作

18、。5、TTable、TQuery、TStoredproc组件负责与实际的数据库表联系,并从中获取数据信息,因而它们又常常被称为数据集部件,它们在程序设计过程中是可见的,但在程序运行时是不可见的,它们通过 BDE 为应用程序提供与数据库的连接, 数据控制部件通过TDataSource部件与数据集部件相连,为用户提供一个可视化的界面,并在其中显示数据库中的数据信息。6、Delphi可以访问多种数据库管理系统的数据库,凭借窗体(Forms)和报表(Reports),BDE(Borland Database Engine)可以访问诸如Paradox、dBASE、本地InterBase 服务器的数据库,

19、也可以访问远程数据库服务器上的数据库(如ORACLE、SyBase、Informix等客户/服务器数据库中的数据库),或任何经ODBC(Open Database Connecticity) 可访问的数据库管理系统中的数据库。2 系统设计 2.1系统结构图本系统分学生档案管理,学生交费管理,职工人事管理,数据维护,系统功能5大模块,25个完整功能。系统结构图如图1-1所示。校园综合管理系统 2.2 2.3 职工信息条件式查询职工档案资料综合管理学生档案录入维护专业表维护班名表档案报表浏览与打印学生档案条件式查询维护民族表部门表维护学生档案统计备份与恢复职工档案录入职务表维护交费数据录入档案报表

20、浏览与打印交费情况条件查询欠费情况浏览与统计交费报表浏览与打印职称表维护费用标准表用户信息修改密码权限设置职工人事管理学生交费管理系统功能维护系名表维护年级表学生档案管理数据维护图11 校园综合信息管理系统结构图2.2 业务流程图 根据学校管理的行业特点和该学校的实际情况,流程进行分析如图1-2所示。 图1-2 校园综合管理系统结构流程图学生档案录入学生档案信息报表打印学生档案查询学生交费录入职工档案录入报表打印学生交费信息职工档案查询职工档案统计报表打印职工档案信息学生欠费查询学生交费查询学生档案统计学生职工2.3 数据库设计 针对黑龙江科技学院的学籍管理和学费管理情况,本系统采用Delph

21、i本地数据库Paradox,数据库路径为data。数据库主要包含的数据表有:bj表,fyb表,fybak表,gzbm表,jfbz表,jszc表,mz表,password表,xj表,xm表,xzzw表,yj表,zg表。 在数据库设计的过程中,严格遵循了以下几点:1、对数据库的必要性和可行性进行研究,确定数据库在待开发的系统中的重要性。2、以用户的需求为主,充分利用现有的软件,构成比较完善的数据库体系。3、减少数据的冗余性,数据间要紧密联系,有较高的数据独立性。4、在设计时应在完整性,安全性,有效性和效益方面进行分析。下面介绍一下系统的主要数据库表格:1、bj表bj表用于保存班级的相关信息。bj表

22、的结构如下表所示。表21 bj表的结构字段名称数据类型字段大小说明XmA20姓名BjA8班级YjA8年级2.、fyb表fyb表用于保存费用的相关信息。fyb表的结构如下表所示。表22 fyb表的结构字段名称数据类型字段大小说明费用表A5学生编号A8学生姓名A20所在系名A8年 级A8班 级A8XF学 费ZF杂 费KBF课本费ZSF住宿费BF班 费KGF课管费3、gzbm表gzbm表用于保存工作部门的相关信息。gzbm表的结构如下表所示。表23 gzbm表的结构字段名称数据类型字段大小说明WorkA12工作部门4、jszc表jszc表用于保存教师职称的相关信息。jszc表的结构如下表所示。 表2

23、4 jszc表的结构字段名称数据类型字段大小说明TitlesA14职称5、fybak表fybak表用于保存备份费用的相关信息。Fybak表的结构如下表所示。 表25 fybak表的结构 字段名称数据类型字段大小说明费用表A5学生编号A8学生姓名A20所在系名A8年 级A8班 级A8XF学 费ZF杂 费KBF课本费ZSF住宿费BF班 费KGF课管费6、mz表mz表用于保存民族的相关信息。 mz表的结构如下表所示。 表26 mz表的结构字段名称数据类型字段大小说明民A10民族7、xm表 xm表用于保存系名的相关信息。xm表的结构如下表所示。 表27 xm表的结构字段名称数据类型字段大小说明xmA2

24、0系名8、xzzw表 xzzw表用于保存行政职务的相关信息。xzzw表的结构如下表所示。表28 xzzw表的结构字段名称数据类型字段大小说明captionA14职务9、jfbz表 jfbz表用于保存交费的相关信息。jfbz表的结构如下表所示。表29 jfbz表的结构 字段名称数据类型字段大小说明BjA8班 级Xf学 费Zf杂 费Bf班费Kbf课本费Jsf借书费Jdf借读费Kgf课管费Sjf上机费Bkf补课费Qtf其他费用10、password表 password表用于保存密码权限的相关信息。password表的结构如下表所示。表210 password表的结构 字段名称数据类型字段大小说明Na

25、mesA2姓 名PasswordsA20密 码JfglL交费管理DaglL档案管理RsglL职工人事管理SjwhL数据维护XtgnL系统功能TjbbL统计报表11、yj表 yj表用于保存年级的相关信息。yj表的结构如下表所示。表 211 yj表的结构字段名称数据类型字段说明yjA10年级12、xj表 xj表用于保存学籍的相关信息。xj表的结构如下表所示。表212 xj表的结构字段名称数据类型字段大小学生编号A5学生姓名A8所在系名A20所在年级A8所在班级A8性 别A2年 龄A3民 族A12政治面貌A8所学专业A20家庭住址A30 13、zg表 zg表用于保存职工的相关信息。zg表的结构如下表

26、所示。表213 zg表的结构字段名称数据类型字段大小职工编号A3职工姓名A8年 龄N性 别A2工作部门A26出生日期D行政职务A12技术职称A12毕业院校A20最高学历A10所学专业A142.4关键技术使用TreeView控件分级显示数据当数据库中保存的数据之间具有层次隶属关系时,就要用到能以树型结构显示并作这类数据的控件:TreeView。TreeView控件显示Node对象的分层列表,每个Node对象均由一个标签和严格可选的位图组成。TreeView一般用于显示文档标题、索引入口、磁盘上的文件和目录或能被有效地分层显示的其他种类信息。创建了TreeView控件之后,可以通过设置属性与调用方

27、法对各Node对象进行操作,这些操作包括添加、删除、对齐和其他操作。可以编程展开与折回Node对象来显示或隐藏所有子节点。 使用DBCtrlGrid分栏显示学生档案 对于学生、职工档案数据,我们有时需要分栏显示,使用DBCtrlGrid只能一条记录显示一行,要把一条记录分成两行、三行,就困难了。DBCtrlGrid控件能把一条记录分成多行进行显示,可以实现分栏显示数据的功能。DBCtrlGrid控件属于数据控制组件,它可以把一条记录用一个Panel显示,默认显示三个Panel(三条记录)。DBCtrlGrid只提供显示数据的环境,不提供显示数据的组件。要显示数据,还需要把其他数据组件(要设置数

28、据源和指定显示字段)加到最上面的Panel上,并且Panel上的组件必须和DBCtrlGrid设置相同的数据源(datasource),程序运行时, DBCtrlGrid自动复制最上面Panel到其他Panel,达到分栏显示数据的功能。分栏显示的例子如下图所示。 图21 职工信息综合管理界面 3 客户端的实现3.1主程序窗口设计1、实现目标 程序启动后,在“系统登陆”界面验证操作远密码后,将进入主程序界面。主程序界面主要实现如下功能:(1) 可通过菜单和工具栏快速选取项目,调用相应子程序。(2) 操作具有权限的业务。2、实现过程 (1)添加新窗体,设置窗体name属性为main,设置窗体cap

29、tion属性为”校园综合信息管理系统”,保存窗体为mainform.pas。 (2)向窗体中添加MainMenu、Panel、SpeedButton、ToolButton等控件,并设置相应属性。3.2 系统登陆界面设计1、实现目标 程序启动后,首先进入“系统登陆”界面验证操作员密码。系统登陆窗口主要实现如下功能:(1) 可选操作员,并凭口令进入系统,支持键盘操作。(2) 操作员错误或密码错误提醒并返回错误点。(3) 实现登陆校园综合管理系统主界面。(4) 输入三次错误密码自动退出系统。系统登陆界面如下图所示。 图31 登陆界面图2、实现过程(1) 添加新窗体,设置窗体name属性为mian_p

30、assword,设置窗体caption属性为“系统登陆”,保存窗体为main_password.pasv。(2) 向窗体中添加Table、DataSource、GroupBox等控件,并设置相应属性。3.3 学生交费数据录入窗口设计1、实现目标 程序启动后,调用“学生交费管理”菜单下的“交费录入”窗口,进入交费数据录入模块。在此模块中主要实现如下功能:(1) 录入、保存、修改、删除交费数据信息,支持键盘操作。(2) 可查找交费信息并可对交费信息进行快速浏览查询。(3) 自动生成5位交费录入编号,自动计算总费用,费用保留两位小数点。交费数据录入界面如下图所示。图32 交费数据录入模块界面图2、实

31、现过程 (1)添加新窗体,设置窗体name属性为mian_xfgl_jflr,设置窗体caption属性为“交费数据录入”,保存窗体为main_xfgl_jflrform.pas。 (2)向窗体中添加Table、DataSource、GroupBox等控件,并设置相应属性。 (3)程序代码如下:procedure Tmain_xfgl_jflr.Table1CalcFields(DataSet: TDataSet);begin table1zfy.Value:=table1XF.Value+table1zf.Value+table1kbf.Value +table1zsf.Value+tabl

32、e1bf.Value+table1kgf.Value+table1bxf.Value +table1sjf.value +table1jdf.Value+table1qtf.Value-table1mjf.Value;end;procedure Tmain_xfgl_jflr.firstbuttonClick(Sender: TObject);begin table1.First; firstbutton.Enabled:=false; prebutton.Enabled:=false; nextbutton.Enabled:=true; lastbutton.Enabled:=true;en

33、d;procedure Tmain_xfgl_jflr.prebuttonClick(Sender: TObject);begin table1.Prior; if table1.Bof then begin prebutton.Enabled:=false; firstbutton.Enabled:=false; end else begin nextbutton.Enabled:=true; lastbutton.Enabled:=true; end; end;procedure Tmain_xfgl_jflr.nextbuttonClick(Sender: TObject);begin

34、table1.Next; if table1.Eof then begin nextbutton.Enabled:=false; lastbutton.Enabled:=false; end else begin prebutton.Enabled:=true; firstbutton.Enabled:=true end;end;procedure Tmain_xfgl_jflr.lastbuttonClick(Sender: TObject);begin table1.Last; lastbutton.Enabled:=false; nextbutton.Enabled:=false; fi

35、rstbutton.Enabled:=true; prebutton.Enabled:=true;end;procedure Tmain_xfgl_jflr.BitBtn6Click(Sender: TObject);begin table1.cancel; bitbtn5.Enabled:=false; bitbtn6.Enabled:=false; end;procedure Tmain_xfgl_jflr.BitBtn3Click(Sender: TObject);begin table1.Edit; bitbtn5.Enabled:=true; bitbtn6.Enabled:=tru

36、e; end;procedure Tmain_xfgl_jflr.BitBtn2Click(Sender: TObject);begin firstbutton.Enabled:=true; prebutton.Enabled:=true; table1.Append; bh.SetFocus; bitbtn5.Enabled:=true; bitbtn6.Enabled:=true;end;procedure Tmain_xfgl_jflr.BitBtn4Click(Sender: TObject);begin if messagebox(main_xfgl_jflr.Handle,确定要删

37、除本条记录吗?,请确认,mb_okcancel)=idok then begin table1.delete; end;end;procedure Tmain_xfgl_jflr.BitBtn5Click(Sender: TObject);begin table1.Post; bitbtn2.SetFocus; bitbtn5.Enabled:=false; bitbtn6.Enabled:=false;end;procedure Tmain_xfgl_jflr.bhKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then b

38、egin key:=#0; xm.SetFocus; end;end;procedure Tmain_xfgl_jflr.xmKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin key:=#0; bj.SetFocus; end;end;procedure Tmain_xfgl_jflr.xxKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin key:=#0; yj.SetFocus; end;end;procedure T

39、main_xfgl_jflr.yjKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin key:=#0; xf.SetFocus; end;end;procedure Tmain_xfgl_jflr.bjKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin key:=#0; xx.SetFocus; end;end;procedure Tmain_xfgl_jflr.kbfKeyPress(Sender: TObject; va

40、r Key: Char);begin if key=#13 then begin key:=#0; sjf.SetFocus; end;end;procedure Tmain_xfgl_jflr.zsfKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin key:=#0; jdf.SetFocus; end;end;procedure Tmain_xfgl_jflr.bfKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin ke

41、y:=#0; zsf.SetFocus; end;end;procedure Tmain_xfgl_jflr.kgfKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin key:=#0; sxf.SetFocus; end;end;procedure Tmain_xfgl_jflr.sxfKeyPress(Sender: TObject; var Key: Char);begin if key=#13 then begin key:=#0; bf.SetFocus; end;end;procedure Tmain_xfgl_jflr.sjfKeyPress(Sender: TObject;

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 建筑/施工/环境 > 项目建议


备案号:宁ICP备20000045号-2

经营许可证:宁B2-20210002

宁公网安备 64010402000987号