简单图像浏览器的设计与实现实验版.ppt

简单图像浏览器的设计与实现 实验设计和步骤 运行Delphi7，利用File菜单下的“New－Application”新建一个工程； 在D盘下新建一个文件夹（以自己名字命名），把工程文件 以“ImagesView.dpr”为文件名保存到该文件夹中； 把单元文件以“ImagesViewSource_Unit.pas”为文件名也保存到该文件夹中； 在窗体上，设计出如下图所示的程序界面； 简单图像浏览器界面设计 实验设计和步骤 TToolBar工具栏组件位于组件面板的Win32选项卡上可以实现工具栏的功能。 操作：从面板上拖放一个组件放到窗体上即可。 实验设计和步骤 TSpeedButton快捷按钮组件位于组件面板的Additional选项卡上，按钮可显示小图片和文字。 主要属性： Flat：flat属性为True时，按钮显示效果类似WinXP风格鼠标放在按钮上方才会显示出按钮边框 ;当flat属性为False时，按钮一直显示边框。 Glyph:设置上要显示的BMP小图片。 实验设计和步骤 操作：按照下面图示的方法，为各按钮添加图片。 实验设计和步骤 Panel容器面板组件位于组件面板的Standard选项卡上相当于一个容器，设计界面经常用。 主要属性： Align：设置组件在窗体中的排列方式 BevelInner和BevelOuter：设置组件内、外边框斜面 操 作：从面板上拖放一个组件放到窗体上，设置Align 为alClient。 BevelInner和BevelOuter属性均为：bvLowered 实验设计和步骤 Image图像组件位于组件面板的Additional选项卡上，用来显示和处理图片（*.bmp和*.jpg）。 主要属性： Center：设置图片是否位于组件的中间位置 Picture：调入图像文件 LoadFromFlie:从磁盘目录打开图片文件 SaveToFlie :把图像保存到指定的磁盘目录中 Stretch：当Stretch为True时，图像将根据组件的大小调整自身的大小 相关知识：对话框组件 OpenDialog打开文件对话框 主要属性 FileName属性 ：保存了用户选中的文件的文件名和路径信息 Filter属性:文件类型过滤器，用来设置哪些类型的文件可以在对话框中显示。 Execute方法：打开对话框，如果用户选择“打开”按钮则返回true，否则返回false; 实验设计和步骤 操 作： 把一个OpenDialog打开文件对话框组件放到窗体上，并在对象观察器里设置它的属性： Filter属性:文件类型过滤器，用来设置哪些类型的文件可以在对话框中显示。 添加2个：BMP文件 (*.Bmp)|*.Bmp Jpeg文件 (*.Jpeg)|*. Jpeg 实验设计和步骤 TSaveDialog保存文件对话框 主要属性 FileName ：用户指定存放文件的文件名和路径信息 Filter:文件类型过滤器，用来设置保存成哪类型的文件 Execute方法：打开对话框，如果用户选择“保存”按钮则返回true，否则返回false; 操作 Filter属性添加2个：BMP文件 (*.Bmp)|*.Bmp Jpeg文件 (*.Jpeg)|*. Jpeg 实验设计和实现 实验设计和实现 实验设计和实现 实验设计和实现 实验设计和实现 * * Panel面板组件（Standard） SpeedButton快捷按钮（Additional） ToolBar工具栏组件（Win32） Image图像组件（ Additional ） OpenDialog和SaveDialog对话框（Dialog） 为了使得窗口一打开，图像处于窗体的中间，可在窗体的OnShow响应事件过程中，编写代码： 思考：当窗体的大小发生变化时（如最大化）如何使得图像仍然出于窗体客户 区的中间位置呢？ 快捷按钮 的功能实现： 方法：双击按钮，在按钮的OnClick响应事件过程中，编写代码： 快捷按钮 的功能实现： 方法：双击按钮，在按钮的OnClick响应事件过程中，编写代码： 快捷按钮 的功能实现： 方法：双击按钮，在按钮的OnClick响应事件过程中，编写代码： 快捷按钮 的功能实现： 方法：双击按钮，在按钮的OnClick响应事件过程中