转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件开发 >> Delphi程序 >> 正文
用Delphi 4.0 设 计 新 型 界 面         ★★★★

用Delphi 4.0 设 计 新 型 界 面

作者:闵涛 文章来源:闵涛的学习笔记 点击数:983 更新时间:2009/4/23 18:24:21
界面设计是否合理美观、易于使用并符合专业习惯是评价应用程序设计水平的一个重要方面。Windows98和Office97等软件的新型操作界面让人看起来赏心阅目,用起来简单方便。Delphi4.0为我们创建这种新型工作界面提供了许多控件,使得界面设计工作变得轻松愉快、方便快捷。下面结合实例说明如何利用Delphi4.0来实现新型界面的设计。

1.图形化菜单

图形化菜单是指在菜单项左边设置一个小位图,我们在Office97等软件中经常看到这种类型的菜单。用Delphi4.0实现图形化菜单非常方便,具体实现过程如下:

  • 双击Win32页上的ImageList控件,向工程中增加一个图象列表控件。现在双击窗体中的ImageList1图象列表控件打开图象处理对话框,单击Add…按钮增加位图Filenew.bmp(在Delphi4.0默认安装时,该位图文件位于C:\Programsfiles\Commonfiles\Boland shared\Images\Buttons目录下),当出现Confirm对话框时单击No按钮,然后在Options 单选按钮中选定Crop,按同样方法增加位图Fileopen.bmp、Cut.bmp、Copy.bmp、Paste.bmp、Print.bmp、Undo.bmp、Retry.bmp、Check.bmp。
  • 双击Standard页上的MainMenu控件,在刚才创建的工程中增加一个主菜单控件,设置其Images属性为ImageList1。然后双击窗体中的主菜单控件打开菜单设计工具创建各菜单项,按下表所示为每个菜单项设置Caption和ImageIndex属性,并接受Delphi为每个菜单项的Name属性生成的缺省值。注意在Caption属性中输入一个连字符(-)用来在菜单间产生一条分割线,而在ImageIndex属性中输入-1表示在该菜单项左边不出现小位图,输入其它自然数对应ImageList1控件中的位图索引号,所选位图最好与其它流行软件一致,便于用户熟悉程序。最后设置工具栏和状态栏菜单项的Checked属性为True。运行应用程序就可看到图形化菜单了。
Caption	ImageIndex	Caption	ImageIndex
Caption	ImageIndexCaption	ImageIndex
文件(H)-1	编辑(E)-1	视图(V)-1	帮助(H)-1
新建(N)0	撤消(U)7	工具栏8	关于…	-1
打开(O)1	重复(R)6	状态栏8
关闭(C)-1	-
打印(P)5	剪切(X)2-复制(C)3
退出(X)-1粘贴(P)4

2.新型平面工具栏

如果注意一下Windows98的资源管理器工作界面上? 具栏,你会发现工具栏上的按钮全是平的,而当鼠标停留在某个铵钮上时,该按钮会凸出来,并且图象的颜色也变了。这就是新型的平面工具栏。Delphi4.0中实现平面工具栏也很方便。下面举例说明:

  • 双击Win32页上的ToolBar和StatusBar控件,在刚才创建的工程中增加一个工具栏控件和一个状态栏控件。右键单击ToolBar1工具栏控件打开快捷菜单,先单击NewButton 两次,单击NewSeparator一次,再单击NewButton叁次,单击NewSeparator一次,最后单击NewButton两次。工具栏中生成七个按钮和两个分隔条。
  • 设置ToolBar1工具栏控件的Flat属性为True、使其成为平面菜单。设置AutoSize属性为True、BorderWidth属性取值1,使工具栏中的按钮上下居中。
  • 双击Win32页上的ImageList控件,在刚才创建的工程中再增加一个图象列表控件。现在双击窗体中的ImageList2图象列表控件打开图象处理对话框,单击Add…按钮增加位图Filenew.bmp,当出现Confirm对话框时单击Yes按钮把该位图分成两个图象,然后在Images中选定彩色显示的那个图象并按Delete按钮删除该图象。按同样方法增加位图Fileopen.bmp、Cut.bmp、Copy.bmp、Paste.bmp、Print.bmp、Undo.bmp、Retry.bmp。
  • 设置ToolBar1工具栏控件的Images属性为ImageList2、HotImages属性为ImageList1,使鼠标经过某一按钮时其图象改变颜色。如果愿意的话你还可再增加一个图象列表控件 ImageList3并为其增加一些位图,然后设置ToolBar1工具栏控件的DisableImages属性为ImageList3,这样当工具栏中某个按钮的Enabled属性为False时该按钮将显示 ImageList3中对应的图象。

3.设置菜单项是否选中

单击Word97视图菜单中的标尺菜单项,注意其选中标记的设置。在本例中可为视图菜单中的工具栏菜单项写一个鼠标单击事件处理句柄来实现这种功能。程序清单附后。然后单击状态栏菜单项OnClick事件右边的下拉列表并选定N11Click以便与工具栏菜单项共享代码。

4.显示飞行提示

从左到右分别设置工具栏每个按钮的Hint属性为新建、打开、剪切、复制、粘贴、打印、撤消、重复,并把每个按钮的ShowHint属性设置为True。这样程序运行过程中当鼠标停留在按钮上时会出现飞行提示。

5.自动调整控件大小和分隔窗口

在设计界面时用好控件的Align属性是非常重要的。控件的Align属性用来决定该控件在其容器中的位置以及当容器大小发生改变时控件是否自动调整大小。控件的Align属性可以取alNone、alTop、alBottom、alLeft、alRight、alClient 六个值之一。缺省值为alNone,表示控件保持设计时在窗体或面板中的位置和大小;若改为alTop,则控件移至窗体顶部,宽度随窗体大小改变而改变但高度不变;若改为alClient,则控件充满窗体的未占用客户区,窗体大小改变时也是如此。

Delphi4.0提供的Splitter控件可用来分隔窗口。

现在向窗体中增加一个DirectoryOutline控件并将其Align属性设置为alLeft,再向窗体中增加一个Splitter控件,最后向窗体中增加一个RichEdit控件并将其Align属性设置为alClient。

运行程序你就会看到一个能自动调整控件大小并可分隔窗口的工作界面。

6.设置带下拉菜单的按钮

Windows98的资源管理器工具栏上的前进、后退和查看按钮右边都带有下拉菜单按钮,这种按钮用来设置快捷方式很有用处,比如退回一步或重新打开以前打开过的文件。用Delphi4.0可以很方便地实现这种功能。

  • 向窗体中增加一个弹出式菜单PopupMenu1、一个打开对话框OpenDialog1和一个保存对话框SaveDialog1。
  • 设置工具栏中打开按钮的Style属性为tbsDropDown,DropDownMenu属性为PopuMenu1。
  • 手工编写一个单击事件处理句柄MenuItemClick,程序清单附后。
  • 分别为文件菜单中的打开和保存菜单项写单击事件处理句柄,程序清单附后。
  • 单击工具栏中打开按钮OnClick事件右边的下拉列表并选定N10Click以便与打开菜单项共享代码。
  • 运行程序并选定文件菜单中的保存命令将文本框中的内容保存到一个文件中。
  • 清除文本框中内容RichEdit1。
  • 单击打开按钮右边的下拉按钮出现一个下拉菜单,其中有一个菜单项的内容就是你刚保存的文件名,单击该菜单项程序将文件中的内容又装入了文本框。


[聊天工具]下载QQ珊瑚虫版v4.0 抵挡探隐身软件侦测__天极Yes…  [聊天工具]腾讯QQ/TM珊瑚虫外挂发布v4.0 B4版__天极Yesky
[聊天工具]腾讯QQ/TM珊瑚虫外挂发布v4.0 B3版__天极Yesky  [VB.NET程序]调 用API 函 数 设 计ABOUT 窗 口
[Delphi程序]用Delphi 6开发Web services 2  [Delphi程序]用Delphi 6开发Web services 1
[Delphi程序]一 个 实 用 的Delphi 屏 幕 拷 贝 程 序 的 设  [Delphi程序]用Delphi 控制窗体的大小
[Delphi程序]用Delphi + DirectX开发简单RPG游戏  [Delphi程序]用Delphi 压缩Access数据库
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · C语言系列  · VB.NET程序
    · JAVA开发  · Delphi程序
    · 脚本语言
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台