DELPHI与电气控制课程设计报告格式.docVIP

河南机电高等专科学校 课程设计报告书 课程名称： DELPHI与电气控制 课题名称： 电 梯 模 拟 专 业： 电 气 自 动 化 班 级： 自 064 班 学 号： 0614154 0 8 姓 名： 史 婷 婷 成 绩： 2008年 12 月 27 日 设 计 任 务 书 一、设计任务 1：在完成Delphi课程的学习之后，通过设计编程项目提高实际操作运用能力。 2：在完成项目设计实现的过程中，通过在图书馆、网络上等有哪些信誉好的足球投注网站和学习相关资料，提高自己解决问题的能力和实际开发应用能力，掌握使用delphi进行系统开发的一般步骤、方法和技巧。 二、设计方案及工作原理 1、方案： 设计编程实现电梯模拟运行。 2、工作原理： （1）：在完成Delphi课程的学习之后，为提高实际操作运用能力，编程模拟模拟电梯的运行。 （2）：模拟实现电梯的运行，设计了五层楼模拟，每一层均有开门和自动关门的功能，并有电梯所到楼层的状态显示。 （3）：在每一层楼，设计有楼层按钮，可以所到楼层的选择，基本上实现了仿真模拟电梯的运行。 目 录 系统设计要求和解决方案 软件实现 缺点及可能的解决方法 心得体会 附录一、参考文献 附录二、程序流程图 第一章 系统设计要求和解决方案 一、设计要求： 模拟实现五层楼之间电梯的正常运行，每一层均有开门和自动关门的功能，并有电梯所到楼层的状态显示；每一层均要有楼层键盘，供电梯使用者方便的到所需楼层；在电梯关门之前，电梯不能上下运行，只有等电梯关门之后，才能安全运行。 二、解决方案 1、窗体Form1组成： 窗体Form1由label、button、shape、timer组件组成。 2、组件的使用: Label组件用来插入图片作为背景；shape组件分别用来做电梯模型和楼层状态显示；button组件用来作为开门及自动关门按钮，还有起始的乘用按钮、楼层按钮；button组件中用来编写控制timer的语句命令；timer组件中用来编写控制shape的命令语句，模拟电梯运行及状态显示。 3、示意图如下： 第二章 软件实现 程序代码： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls; type TForm1 = class(TForm) Shape1: TShape; Shape2: TShape; Button1: TButton; Button2: TButton; Button3: TButton; Button4: TButton; Button5: TButton; Button6: TButton; Button7: TButton; Button8: TButton; Button9: TButton; Button10: TButton; Button11: TButton; Button12: TButton; Button13: TButton; Button14: TButton; Button15: TButton; Button16: TButton; Button17: TButton; Button18: TButton; Button19: TButton; Button20: TButton; Timer1: TTimer; Timer2: TTimer; Timer3: TTimer; Timer4: TTimer; Timer5: TTimer; Timer6: TTimer; Timer7: TTimer; Timer8: TTimer; Timer9: TTimer; Timer10: TTimer; Timer11: TTimer; Timer12: TTimer; Timer13: TTimer; Timer14: TTimer; Timer15: TTimer; Timer16: TTimer; Tim