⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 界 面.htm

📁 对于学习很有帮助
💻 HTM
字号:
🔍 
<html>

<head>
<link REL="stylesheet" HREF="/style.css" TYPE="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>计算机世界日报:
用Delphi 4.0 设计新型界面
</title>
<!--***********-->
</head>

<body bgcolor="#FFFFFF" >














<p><br>
<font color="#b904e8"><b><em><a href="class.htm">返回</a></em></b></font>
<center>
<font color="#0000c0"><h2>
用Delphi 4.0 设 计 新 型 界 面
</h2></font>
<h3>
江 苏 省 常 州 化 工 学 校 教 务 科
<br>刘 福 新
</h3>
</center>
<font color="#ffffff">----</font>

 界 面 设 计 是 否 合 理 美 观、 易 于 使 用 并 符 合 专 业 习 惯 是 评 价 应 用 程 序 设 计 水 平 的 一 个 重 要 方 面。Windows 98 和Office 97 等 软 件 的 新 型 操 作 界 面 让 人 看 起 来 赏 心 阅 目， 用 起 来 简 单 方 便。Delphi 4.0 为 我 们 创 建 这 种 新 型 工 作 界 面 提 供 了 许 多 控 件， 使 得 界 面 设 计 工 作 变 得 轻 松 愉 快、 方 便 快 捷。 下 面 结 合 实 例 说 明 如 何 利 用Delphi 4.0 来 实 现 新 型 界 面 的 设 计。
<p><font color="#ffffff">----</font>
1. 图 形 化 菜 单
<p><font color="#ffffff">----</font>
 图 形 化 菜 单 是 指 在 菜 单 项 左 边 设 置 一 个 小 位 图， 我 们 在Office 97 等 软 件 中 经 常 看 到 这 种 类 型 的 菜 单。 用Delphi 4.0 实 现 图 形 化 菜 单 非 常 方 便， 具 体 实 现 过 程 如 下：
<ul><li>
 双 击Win32 页 上 的ImageList 控 件， 向 工 程 中 增 加 一 个 图 象 列 表 控 件。 现 在 双 击 窗 体 中 的ImageList1 图 象 列 表 控 件 打 开 图 象 处 理 对 话 框， 单 击  Add … 按 钮 增 加 位 图Filenew.bmp（ 在Delphi 4.0 默 认 安 装 时， 该 位 图 文 件 位 于C:\Programs files\Common files\Boland shared\Images\Buttons 目 录 下）， 当 出 现 Confirm 对 话 框 时 单 击  No  按 钮， 然 后 在 Options 单 选 按 钮 中 选 定  Crop  ， 按 同 样 方 法 增 加 位 图 Fileopen.bmp、Cut.bmp、Copy.bmp、Paste.bmp、Print.bmp、Undo.bmp、Retry.bmp、Check.bmp。

<br><li> 双 击Standard 页 上 的MainMenu 控 件， 在 刚 才 创 建 的 工 程 中 增 加 一 个 主 菜 单 控 件， 设 置 其 Images 属 性 为ImageList1。 然 后 双 击 窗 体 中 的 主 菜 单 控 件 打 开 菜 单 设 计 工 具 创 建 各 菜 单 项， 按 下 表 所 示 为 每 个 菜 单 项 设 置Caption 和ImageIndex 属 性， 并 接 受Delphi 为 每 个 菜 单 项 的Name 属 性 生 成 的 缺 省 值。 注 意 在Caption 属 性 中 输 入 一 个 连 字 符（-） 用 来 在 菜 单 间 产 生 一 条 分 割 线， 而 在ImageIndex 属 性 中 输 入-1 表 示 在 该 菜 单 项 左 边 不 出 现 小 位 图， 输 入 其 它 自 然 数 对 应ImageList1 控 件 中 的 位 图 索 引 号， 所 选 位 图 最 好 与 其 它 流 行 软 件 一 致， 便 于 用 户 熟 悉 程 序。 最 后 设 置 工 具 栏 和 状 态 栏 菜 单 项 的Checked 属 性 为True。 运 行 应 用 程 序 就 可 看 到 图 形 化 菜 单 了。</ul>
<pre>
Caption	ImageIndex	  Caption	ImageIndex
Caption	ImageIndex    Caption	ImageIndex
文件（H）-1	编辑（E）-1	视图（V）-1	帮助（H）-1
新建（N） 0	撤消（U） 7	工具栏 8	关于…	-1
打开（O） 1	重复（R） 6	状态栏８
关闭（C）-1	-
打印（P） 5	剪切（X） 2 -复制（C）3
退出（X）-1粘贴（P） 4
</pre>
<p><font color="#ffffff">----</font>
2. 新 型 平 面 工 具 栏
<p><font color="#ffffff">----</font>
 如 果 注 意 一 下Windows 98 的 资 源 管 理 器 工 作 界 面 上 的 工 具 栏， 你 会 发 现 工 具 栏 上 的 按 钮 全 是 平 的， 而 当 鼠 标 停 留 在 某 个 铵 钮 上 时， 该 按 钮 会 凸 出 来， 并 且 图 象 的 颜 色 也 变 了。 这 就 是 新 型 的 平 面 工 具 栏。Delphi 4.0 中 实 现 平 面 工 具 栏 也 很 方 便。 下 面 举 例 说 明：
<ul><li>
 双 击Win32 页 上 的 ToolBar 和 StatusBar 控 件， 在 刚 才 创 建 的 工 程 中 增 加 一 个 工 具 栏 控 件 和 一 个 状 态 栏 控 件。 右 键 单 击 ToolBar1 工 具 栏 控 件 打 开 快 捷 菜 单， 先 单 击 New Button 两 次， 单 击 New Separator 一 次， 再 单 击 New Button 叁 次， 单 击 New Separator 一 次， 最 后 单 击 New Button 两 次。 工 具 栏 中 生 成 七 个 按 钮 和 两 个 分 隔 条。

<br><li> 设 置ToolBar1 工 具 栏 控 件 的 Flat 属 性 为True、 使 其 成 为 平 面 菜 单。 设 置 AutoSize 属 性 为True 、BorderWidth 属 性 取 值 １， 使 工 具 栏 中 的 按 钮 上 下 居 中。

<br><li> 双 击Win32 页 上 的ImageList 控 件， 在 刚 才 创 建 的 工 程 中 再 增 加 一 个 图 象 列 表 控 件。 现 在 双 击 窗 体 中 的ImageList ２ 图 象 列 表 控 件 打 开 图 象 处 理 对 话 框， 单 击  Add … 按 钮 增 加 位 图Filenew.bmp， 当 出 现 Confirm 对 话 框 时 单 击  Yes  按 钮 把 该 位 图 分 成 两 个 图 象， 然 后 在 Images 中 选 定 彩 色 显 示 的 那 个 图 象 并 按  Delete  按 钮 删 除 该 图 象。 按 同 样 方 法 增 加 位 图 Fileopen.bmp、Cut.bmp、Copy.bmp、Paste.bmp、Print.bmp、Undo.bmp、Retry.bmp。

<br><li> 设 置ToolBar1 工 具 栏 控 件 的 Images 属 性 为ImageList2、HotImages 属 性 为ImageList1， 使 鼠 标 经 过 某 一 按 钮 时 其 图 象 改 变 颜 色。 如 果 愿 意 的 话 你 还 可 再 增 加 一 个 图 象 列 表 控 件 ImageList3 并 为 其 增 加 一 些 位 图， 然 后 设 置ToolBar1 工 具 栏 控 件 的 DisableImages 属 性 为ImageList ３， 这 样 当 工 具 栏 中 某 个 按 钮 的 Enabled 属 性 为 False 时 该 按 钮 将 显 示 ImageList3 中 对 应 的 图 象。</ul>
<p><font color="#ffffff">----</font>
3. 设 置 菜 单 项 是 否 选 中
<p><font color="#ffffff">----</font>
 单 击Word 97 视 图 菜 单 中 的 标 尺 菜 单 项， 注 意 其 选 中 标 记 的 设 置。 在 本 例 中 可 为 视 图 菜 单 中 的 工 具 栏 菜 单 项 写 一 个 鼠 标 单 击 事 件 处 理 句 柄 来 实 现 这 种 功 能。 程 序 清 单 附 后。 然 后 单 击 状 态 栏 菜 单 项 OnClick 事 件 右 边 的 下 拉 列 表 并 选 定 N11Click 以 便 与 工 具 栏 菜 单 项 共 享 代 码。
<p><font color="#ffffff">----</font>
4. 显 示 飞 行 提 示
<p><font color="#ffffff">----</font>
 从 左 到 右 分 别 设 置 工 具 栏 每 个 按 钮 的Hint 属 性 为 新 建、 打 开、 剪 切、 复 制、 粘 贴、 打 印、 撤 消、 重 复， 并 把 每 个 按 钮 的ShowHint 属 性 设 置 为True。 这 样 程 序 运 行 过 程 中 当 鼠 标 停 留 在 按 钮 上 时 会 出 现 飞 行 提 示。
<p><font color="#ffffff">----</font>
5. 自 动 调 整 控 件 大 小 和 分 隔 窗 口
<p><font color="#ffffff">----</font>
 在 设 计 界 面 时 用 好 控 件 的Align 属 性 是 非 常 重 要 的。 控 件 的Align 属 性 用 来 决 定 该 控 件 在 其 容 器 中 的 位 置 以 及 当 容 器 大 小 发 生 改 变 时 控 件 是 否 自 动 调 整 大 小。 控 件 的Align 属 性 可 以 取alNone、alTop、alBottom、alLeft、alRight、alClient 六 个 值 之 一。 缺 省 值 为alNone， 表 示 控 件 保 持 设 计 时 在 窗 体 或 面 板 中 的 位 置 和 大 小； 若 改 为alTop， 则 控 件 移 至 窗 体 顶 部， 宽 度 随 窗 体 大 小 改 变 而 改 变 但 高 度 不 变； 若 改 为alClient， 则 控 件 充 满 窗 体 的 未 占 用 客 户 区， 窗 体 大 小 改 变 时 也 是 如 此。
<p><font color="#ffffff">----</font>
Delphi 4.0 提 供 的Splitter 控 件 可 用 来 分 隔 窗 口。
<p><font color="#ffffff">----</font>
 现 在 向 窗 体 中 增 加 一 个 DirectoryOutline 控 件 并 将 其 Align 属 性 设 置 为alLeft， 再 向 窗 体 中 增 加 一 个Splitter 控 件， 最 后 向 窗 体 中 增 加 一 个 RichEdit 控 件 并 将 其 Align 属 性 设 置 为alClient。
<p><font color="#ffffff">----</font>
 运 行 程 序 你 就 会 看 到 一 个 能 自 动 调 整 控 件 大 小 并 可 分 隔 窗 口 的 工 作 界 面。
<p><font color="#ffffff">----</font>
6. 设 置 带 下 拉 菜 单 的 按 钮
<p><font color="#ffffff">----</font>
Windows 98 的 资 源 管 理 器 工 具 栏 上 的 前 进、 后 退 和 查 看 按 钮 右 边 都 带 有 下 拉 菜 单 按 钮， 这 种 按 钮 用 来 设 置 快 捷 方 式 很 有 用 处， 比 如 退 回 一 步 或 重 新 打 开 以 前 打 开 过 的 文 件。 用Delphi 4.0 可 以 很 方 便 地 实 现 这 种 功 能。
<ul><li>
 向 窗 体 中 增 加 一 个 弹 出 式 菜 单PopupMenu1、 一 个 打 开 对 话 框 OpenDialog1 和 一 个 保 存 对 话 框 SaveDialog1。
<br><li> 设 置 工 具 栏 中 打 开 按 钮 的Style 属 性 为tbsDropDown，DropDownMenu 属 性 为PopuMenu1。
<br><li> 手 工 编 写 一 个 单 击 事 件 处 理 句 柄 MenuItemClick， 程 序 清 单 附 后。
<br><li> 分 别 为 文 件 菜 单 中 的 打 开 和 保 存 菜 单 项 写 单 击 事 件 处 理 句 柄， 程 序 清 单 附 后。
<br><li> 单 击 工 具 栏 中 打 开 按 钮 OnClick 事 件 右 边 的 下 拉 列 表 并 选 定 N10Click 以 便 与 打 开 菜 单 项 共 享 代 码。
<br><li> 运 行 程 序 并 选 定 文 件 菜 单 中 的 保 存 命 令 将 文 本 框 中 的 内 容 保 存 到 一 个 文 件 中。
<br><li> 清 除 文 本 框 中 内 容 RichEdit1。
<br><li> 单 击 打 开 按 钮 右 边 的 下 拉 按 钮 出 现 一 个 下 拉 菜 单， 其 中 有 一 个 菜 单 项 的 内 容 就 是 你 刚 保 存 的 文 件 名， 单 击 该 菜 单 项 程 序 将 文 件 中 的 内 容 又 装 入 了 文 本 框。</ul>
<p><font color="#ffffff">----</font>
7. 程 序 工 作 界 面 [ 图 略]
<p><font color="#ffffff">----</font>
8.  <a href="050402-05.zip"> 程 序 代 码 清 单 </a> Zipped 2KB


 



<p align="right"><small><em>中国计算机世界出版服务公司版权所有</em></small> 
<br>
</p>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -