实验一：熟悉Delphi7.0集成开发环境

《实验一：熟悉Delphi7.0集成开发环境》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、中国计量学院实验报告实验课程：数据库应用实验日期：2010.3.19实验名称：熟悉Delphi7.0集成开发环境班级：08信管2班学号：0800702219姓名：魏颖雯实验报告成绩：教师签名：指导教师评语：一.实验目的通过本次实验，熟悉集成开发环境，了解Delphi的主菜单、工具栏、控件面板、对象观察器、主窗体和代码编辑器的使用方法。二.通过实验，理解Delphi可视化编程的基本概念，掌握Delphi工程和窗体的建立过程，熟悉Delphi工程文件、单元文件和窗体文件的结构。能够建立简单的工程、窗

2、三.实验环境Delphi7四.实验内容和步骤1．启动Delphi7程序，熟悉其可视化集成开发环境，包括主菜单、工具栏、组件面板、对象观察器、主窗体、代码编辑器、窗体设计器；7可视化集成开发环境1．进入Delphi的主菜单，了解各菜单的名称和功能。2．观察组件栏中各组件选项卡中的组件名称。3．学习工程建立的标准过程。l新建一个工程，默认工程文件名为project1.dpr；l新建一个窗体，并观察：默认窗体名（即窗体name属性）为Form1，默认单元文件名为Unit1.pas。在窗口中显示“欢迎学

3、习DELPHI”；l保存。窗体FORM1的单元文件名为first.pas，工程另存为mypro.dpr。7l运行。生成一个可执行文件，观察可执行文件名。7l其中使用到的组件为label1和button1分别设置它们的属性，使得label1.caption为“欢迎学习DELPHI”，button1.caption为“退出”。5．编制一个程序，实现如下图所示效果：来自standard面板来自system面板来自system面板7一.需要设置的属性如下：Memo1要设置lines属性，以便于增加歌词内

4、容，设置font字体属性，改变字体大小和颜色。MediaPlayer1要设置autoopen属性为true，设置filename属性以便于找到要播放的文件。Timer2要设置enabeled属性为false。7一.参考代码如下：procedureTForm1.Timer1Timer(Sender:TObject);beginMemo1.Left:=Memo1.Left-100;//实现Memo1向左移动ifMemo1.Left<-Memo1.Widththen//条件控制beginTimer1.

5、Enabled:=false;Timer2.Enabled:=true;end;end;procedureTForm1.Timer2Timer(Sender:TObject);beginMemo1.Left:=Memo1.Left+100;//实现Memo1向右移动ifMemo1.Left>form1.Widththen//条件控制beginTimer2.Enabled:=false;Timer1.Enabled:=true;end;end;7运行结果：一.实验结论通过本次实验，我了解了delp

6、hi的集成开发环境。对Delphi的主菜单，工具栏，控件等有了一些初步了解。能够运用空间制作出某些效果，也对Delphi产生了浓厚的兴趣。7