应用程序设计及框架.pptVIP

3.5 编译并运行项目 编译的目的是将项目文件转化为可执行文件。 有两种编译项目文件的方法： （1）Compile 编译：用于编译做过修改的源程序。 （2）Build编译：对项目中的所有文件重新编译。 使用方法：Project - Compile 或 Build 运行编译后的文件： Run- Run (F9 编译并运行项目文件) 另外还有F7、 F8、 F4。 3.6 项目中的Application对象 为加快程序开发，在任何有窗体的项目中，系统自动定义了一个名为Application的对象，以便用其完成某些独特的功能。 本节讲解Application对象如下内容： 属性及应用 方法及应用 事件及应用 1. 属性及应用 Application对象有较多的属性，常用属性见下表： 属性名 含义 Active 判断当前应用程序是否具有焦点。 ExeName 返回应用程序所在文件名(含路径)。 Hint 用于保存组件的提示信息。注意，当鼠标移动到某个组件上时，则组件的Hint属性值就被赋到此属性中。 Icon 用于设置应用程序在任务栏上显示的图标。 MainForm 返回当前应用程序的主窗体对象。 ShowHint 设置是否显示应用程序的提示信息。 Title 应用程序任务栏上显示的标题。 常使用ExeName属性取应用程序所在的路径名 例如： Label3.caption:= ExtractFilePath(Application.ExeName) ； 其中： ExtractFilePath函数用于返回字符串中的路径名。 另外，ExtractFileName返回字符串中的文件名。这两个函数用处很大，制作自动安装软件时要用到它。 2. Application对象的方法 在项目文件中常使用的方法 Initialize CreateForm Run 上述三种方法3.3.2节已经使用过，它们的作用分别是初始化应用程序、创建窗体和运行应用程序。 使用格式如下： Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; 4. ProcessMessages方法 ProcessMessages用于从Windows消息队列中检索任何等待处理的消息并进行处理. 下面看一段代码： while J 64000 do begin Y := Random(J); Inc(J); Application.ProcessMessages; end; 若没有Application.ProcessMessages方法，则循环程序执行结束前不会响应用户的其它请求。 MessageBox方法 用于打开一个标准的Windows提示信息框。具体使用方法参见第5章提示信息窗口一节。 例如： if Application.MessageBox(提示信息,标题, MB_OKCANCEL)=idok then ShowMessage(ss); Minimize方法 用于把应用程序的主窗口最小化。 Restore方法 用于把应用程序的恢复主窗口显示状态。 3. Application对象的事件 Application有较多的事件，Delphi专门为它提供了一个事件组件，如图所示。 事件 列表 Application较常用的事件列表如下： 事件 描述 OnActivate 当应用程序被激活时，将触发这个事件。 OnDeativate 当应用程序被挂起或切换到其它应用程序时将触发这个事件。 OnException 当一个未处理的异常发生时，将触发这个事件。 OnHelp 当用户请求帮助的时候将触发这个事件。 OnMessage 当应用程序接收到一个消息时将触发这个事件。 OnHint 当鼠标指向某个组件时将触发这个事件。 OnIdle 当应用程序进入空闲状态时将触发这个事件。常使用此事件编写动画游戏。 例1：利用Application组件设计应用程序，要求在主窗体的Statusbar组件中显示鼠标所指组件的提示信息。 提示： 在Application组件的Onhint 事件中加入下代码： Statusbar1.SimpleText := Application.Hint; 本次要讲内容 项目中的Screen对象 常用程序设计技巧 使用资源文件 修改屏幕分辨率 避免程序重复运行 设置程序运行权限 显