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

简单图像浏览器的设计与实现 实验设计和步骤 运行Delphi7 利用File菜单下的 New Application 新建一个工程 在D盘下新建一个文件夹 以自己名字命名 把工程文件以 ImagesView dpr 为文件名保存到该文件夹中 把单元文件以 ImagesViewSource Unit pas 为文件名也保存到该文件夹中 在窗体上 设计出如下图所示的程序界面 Panel面板组件 Standard SpeedButton快捷按钮 Additional ToolBar工具栏组件 Win32 Image图像组件 Additional 简单图像浏览器界面设计 OpenDialog和SaveDialog对话框 Dialog 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 BmpJpeg文件 Jpeg Jpeg 实验设计和步骤 TSaveDialog保存文件对话框主要属性FileName 用户指定存放文件的文件名和路径信息Filter 文件类型过滤器 用来设置保存成哪类型的文件Execute方法 打开对话框 如果用户选择 保存 按钮则返回true 否则返回false 操作Filter属性添加2个 BMP文件 Bmp BmpJpeg文件 Jpeg Jpeg 实验设计和实现 为了使得窗口一打开 图像处于窗体的中间 可在窗体的OnShow响应事件过程中 编写代码 思考 当窗体的大小发生变化时 如最大化 如何使得图像仍然出于窗体客户区的中间位置呢 实验设计和实现 快捷按钮的功能实现 方法 双击按钮 在按钮的OnClick响应事件过程中 编写代码 实验设计和实现 快捷按钮的功能实现 方法 双击按钮 在按钮的OnClick响应事件过程中 编写代码 实验设计和实现 快捷按钮的功能