用Delphi4实现风Word97格的工具栏

你大爷OiTw

你大爷OiTw

2016-01-29 14:02

用Delphi4实现风Word97格的工具栏,用Delphi4实现风Word97格的工具栏
 
用过Word97的人对它的工具栏印象很深刻,因为它的风格很“酷”,同样IE4.0的工具栏也有类似的风格,Win98的出现,使这种风格的工具栏得到了推广。其实,用Delphi4很容易实现具有Word97风格的工具栏。
    在Delphi4的元件选项板Additional页中,新增了Controlbar元件,此元件和Win32页中的Toolbar、Coolbar配合使用,再辅以Imagelist、Mainmenu等元件,完全可以实现具有Word97风格的工具栏。下面以一个FORM中的工具栏为例,详细介绍设计步骤:    
    1从Additional页中选择Controlbar,将其放入FORM1中,设置其属性如下:Allign:=altopAutosize:=trueBevelkind:=bknone
    2从Win32页中选择Toolbar,将其放于Controlbar上,调整Toolbar的位置,使其置于最左,再调整其宽度,设置属性Edgeborders:=[],Flat:=TRUE。用鼠标右击Toolbar,在浮动菜单上选择Newbutton,重复若干次,设计好所需的按钮。
    3从Win32页中选择Imagelist元件,为FORM1设计主菜单,主菜单的设计方法同Delphi2、Delphi3。设计好主菜单后,将其属性Automerge置为TRUE。
    4最后为每一个按钮分配Tmenuitem的Name值,将每个按钮的Menuitem属性值设为所需菜单的Name值。
    按F9运行程序,便可发现,设计出的工具栏已经具有Word97的风格,用鼠标在各个按钮上移动,按钮自动上浮,单击鼠标,弹出相应的菜单。需要说明的是,Mainmenu的属性Automerge置为TRUE,是为了不让主菜单出现在FORM1的最上端。工具栏的设计必须将Controlbar与Toolbar结合使用,不然得不到与Word97外观一样的工具栏 
展开更多 50%)
分享

猜你喜欢

用Delphi4实现风Word97格的工具栏

Delphi
用Delphi4实现风Word97格的工具栏

用Delphi制作Windows 98风格的工具栏

Delphi
用Delphi制作Windows 98风格的工具栏

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

word文档绘图工具栏

电脑应用
word文档绘图工具栏

Word绘画工具栏的详解

word
Word绘画工具栏的详解

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

找回已丢失的Word工具栏

办公软件
找回已丢失的Word工具栏

word文档图片工具栏的设置

电脑应用
word文档图片工具栏的设置

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

文本编辑器的设计(一)

文本编辑器的设计(一)

Delphi中易混淆的概念

Delphi中易混淆的概念
下拉加载更多内容 ↓