最新课程设计电子版模板目录正文部分 免费下载.doc

自动控制系统程序设计目 录第1章 界面设计.11.1 设计背景及目标.11.2 采用的控件.1第2章 程序代码.2第3章 运行效果.3第4章 结论与体会.4参考文献5自动控制系统程序设计第1章 页面设计1.1设计背景及目标背景：自动门是应用先进的感应技术，通过电脑可编程控制。当人或其他活动目标进入传感器工作范围，门扇会自动开启；当人或其他活动目标离开感应区，门扇会自动关闭，本课题是在delphi的环境下，利用编程达到门能够自动开关的目的。目标：（1）主人与大门的界面设计；（2）当主人走到门口附近时，门口的灯由黑色变为红色；（3）主人走到正对着门口时停住，此时大门由关闭变为打开.1.2采用的控件在窗体中，添加additional选项卡中的控件image，如图1-1所示。属性见表1-1。图1-1 控件工具栏表1-1 属性设置控件属性设定值ImagePicture打开Picture editor 对话框，单击“load”按钮，选择要载入的图片，单击ok按钮即可在窗体中，添加system选项中的控件timer，如图1-2所示，属性见表1-2。图 1-2 控件工具栏表 1-1 属性设置控件属性设定值timer时间点击timer选项，后在编辑区出现时钟的标志，之后对其在代码区进行编辑。 在窗体中，添加standard选项中的控件button，如图1-3所示，属性见表1-3。图 1-3 控件工具栏表 1-3 属性设置控件属性设定值button按钮点击button选项，在编辑区拖拽鼠标待出现button键之后，之后对其属性进行修改。 在窗体中，添加standard选项中的控件combobox，如图1-4所示，见属性表1-4。图1-4 控件工具栏表 1-4 属性设置控件属性设定值combobox分选栏点击combobox选项，在编辑区拖拽鼠标使其出现分选栏，在左边点击items栏，后对分选栏中的目标进行设置。第2章 程序代码2.1 combox中的代码procedure TForm1.ComboBox1Change(Sender: TObject);beginif combobox1.ItemIndex=0 then begin image2.Left:=0; image1.Visible:=false; image2.Visible:=true; image4.Visible:=false; end; if combobox1.ItemIndex=1 then begin image1.Left:=0; image2.Visible:=false; image1.Visible:=true; image3.Visible:=true; image4.Visible:=false;end;2.2 formcreate中的代码procedure TForm1.FormCreate(Sender: TObject);beginimage1.Visible:=true;image2.Visible:=false;timer1.Enabled:=false;image3.Visible:=true;image4.Visible:=false;image5.visible:=false;end;2.3 bitbtn中的代码procedure TForm1.BitBtn1Click(Sender: TObject);begintimer1.Enabled:=false;timer1.Enabled:=true;end; 2.4 timer中的代码procedure TForm1.Timer1Timer(Sender: TObject);beginif combobox1.ItemIndex=0 then begin timer1.Enabled:=false; timer1.Enabled:=true; image2.Left:=image2.Left+1; image1.Visible:=true;if (image2.Left)(panel1.Width)/2 thenbegintimer1.Enabled:=false;image3.Visible:=false;image4.Visible:=true;image5.Visible:=true;image1.Visible:=false;end; end;end;end.第3章 运行效果3.1 开始移动的效果图 3-1 人开始移动的效果3.2 移动到门前的效果 图 3-2 人移动到门前的效果第4章 结论与体会结论：根据所给的要求，在现有的背景条件下，利用可视化知识，运用delphi编程环境，进行对自动门的编程达到对门在人远离或靠近时进行自动控制的预期目标。体会：通过这一周的学习，我对delphi进行编程的知识有了一定的了解和掌握，在此期间通过对其的学习可以看出delphi并不是那么容易就能完全掌握，虽然这门课我们开设的时间并不长，但通过老师的讲解是我对在其环境下进行的编程有了深刻的了解，虽然在对程序的代码进行编写时遇到了不小的麻烦，但是在老师的帮助系我还是完成对其的编写。通过此次的学习，我对计算机编程有了更深一步的了解，也希望往自己在以后的学习中能做的更好。 参考文献1于忠达.Delphi7程序设计基础教程M.北京:人民邮电出版社,2004.2赵晓玲.可视化程序设计DelphiM.北京:机械工业出版社,2005.2王学庆.Delphi 6数据库设计实例导航M.北京：科