主题:各位老师!!vb.net2003如何做成xp风格的界面
yswoyh
[专家分:500] 发布于 2005-12-22 16:18:00
vb.net2003如何做成xp风格的界面 谢谢!!!
回复列表 (共6个回复)
沙发
wanggcc [专家分:1450] 发布于 2005-12-22 17:01:00
用C#和VB.NET实现Office XP风格的菜单(转载)
VS.NET或Office XP中的菜单都是非常漂亮的,反正我很喜欢。可惜VS.NET没有带制作这种菜单的控件或组件,不知正式版本会不会提供一个模板和向导。至今还记得刚学计算机语言时自己用Turbo C制作菜单的感受,那些矩形框函数和象素操作的确很迷人,况且那时是如此的流行菜单。
这篇文章中我会介绍有关在Framework SDK Beta 2 中制作自己风格的菜单,所以你最好已安装了Framework SDK Beta 2,VS.NET Beta 2 不一定是必须的。附带的Zip包中的例子都是VS.NET Project的。
整个的文章包括三部分:
开始我会涉及到在Winform中最基本的一些菜单的概念。
然后会有一个以前接触过的有关菜单的例子,它是For Beta 1的。老实说我没有想到Beta1 到Beta2有许多函数和命名空间发生了变化,以前我在Beta1中测试过这个例子,很顺利。这次在Beta2中会有许多错误,我提供了两个Project,一个是原来的Project的,一个是我修改后For Beta 2的。这种移植很枯燥,但可以很快熟悉新的Beta2的类库和函数,Show出来的菜单还不错,感觉是Office2000风格的菜单。如果你有兴趣可以试一试这个过程,会获益非浅的,这个例子还包括按钮的,原来的作者其实是在Demo控件的“Owner-drawn menus”技术;不过我只对菜单部分感兴趣。
最后一部分是制作VS.NET或XP风格的例子,上面那个例子的效果不能使我完全满意,然后我重新写了另外一个,不过我对最后的结果还不是很满意,因为我的没有上一个例子那么完整,例子中我只显示了这个风格的菜单,对于事件响应、状态栏更新、tooltips、菜单的状态(enabled state)等处理都没有考虑,我把这些归结为时间问题,并承诺自己下次把它做得更好。
1.Framework SDK Beta 2中菜单分成两类一类是普通的菜单叫:MainMenu,在VS.NET的Toolsbox中有这样一个对应的菜单控件,拖下它到你的窗体中,设置一下属性就可以所见所得了,这个版本的比VS.Studio98 系列的要好用和漂亮的多。另一类叫:ContextMenu菜单,也就是常用的弹出菜单。对于VB6来说所有的普通菜单在VS.NET中是可以兼容和自动升级成MainMenu类型的菜单,但对于PopMenu的菜单是不能转换成ContextMenu类型的菜单,你必须自己重新修改代码实现。这里我们主要是针对MainMenu的,其实原理一样。
最简单的菜单你可以这样做:
using System;
using System.Windows.Forms;
public class frmVB6 : Form {
private MainMenu muMain ; // MainMenu
public static int Main(string[] Args) {
Application.Run(new frmVB6());
return 0;
}
public frmVB6() {
// The following code sets up the form properties.
this.Text = "Form1";
this.Height = 213 + SystemInformation.CaptionHeight;
this.Width = 312;
this.StartPosition = FormStartPosition.WindowsDefaultLocation;
MenuItem mItemFile = new MenuItem() ;
mItemFile.Text = "&File" ;
MenuItem mItemExit = new MenuItem() ;
mItemExit.Text = "E&xit" ;
muMain = new MainMenu() ;
muMain.MenuItems.Add( mItemFile ) ;
muMain.MenuItems.Add( mItemExit) ;
this.Menu = muMain ;
}
}
手工方式保存它为一个.cs文件然后在编译它:
csc /t:winexe /r:System.dll /r:System.Windows.Forms.Dll /r:System.Drawing.Dll Form1Menu.cs
VS.NET下只用New一个新的WinForm项目,然后在默认窗体中放入MainMenu控件,然后设置完属性,F5就可以了,完全不用一行代码。
如果要生成一个主菜单和一个菜单的子菜单项目,主要是MenuItems.AddRange的方法,看下面的代码:
this.mainMenu1 = new System.Windows.Forms.MainMenu();
this.menuItem1 = new System.Windows.Forms.MenuItem();
this.menuItem2 = new System.Windows.Forms.MenuItem();
this.menuItem3 = new System.Windows.Forms.MenuItem();
this.menuItem4 = new System.Windows.Forms.MenuItem();
// mainMenu1
this.mainMenu1.MenuItems.AddRange(new System.Windows.Forms.MenuItem[] {
this.menuItem1, this.menuItem2});
// menuItem1
this.menuItem1.Index = 0;
this.menuItem1.MenuItems.AddRange(new System.Windows.Forms.MenuItem[] {
this.menuItem3, this.menuItem4});
this.menuItem1.Index = 0 ;
this.menuItem1.Text = "&File";
// menuItem2
this.menuItem2.Index = 1;
this.menuItem2.Text = "Help";
// menuItem3
this.menuItem3.Index = 0;
this.menuItem3.Text = "Open";
this.menuItem3.Click += new System.EventHandler(this.menuItem3_Click);
// menuItem4
this.menuItem4.Index = 1;
this.menuItem4.Text = "Exit";
this.menuItem4.Click += new System.EventHandler(this.menuItem4_Click);
this.Menu = this.mainMenu1;
如代码所示MenuItem1(File)和MenuItem2(Help)被AddRange到MainMenu1中成为了顶级的菜单,MenuItem3(Open)和MenuItem4(Exit)被AddRange到MenuItem1(File)中成为了File菜单下的子菜单项。
this.menuItem3.Click += new System.EventHandler(this.menuItem3_Click);表明MenuItem3点击时激发的事件处理程序,一般的事件处理程序象下面这样:
private void menuItem3_Click(object sender, System.EventArgs e)
{
MessageBox.Show ( " My Click Open" ) ;
}
我们关心的其实是MenuItem,让它用我们的方式画出有VS.NET或XP风格的菜单就可以了,更简单的说就是实现一个MenuItem的继承类,扩展它Draw的部分。好吧,让我们深入一点看看第二部分。
2.“Owner-drawn menus”技术
板凳
wanggcc [专家分:1450] 发布于 2005-12-22 17:01:00
这个例子是VB.NET语法的.我去掉了和Menu无关的Class,原因是错误太多,你会遇到类库和命名空间的移植性的问题:
最多的是Beta1 System.WinForms 和Beta 2 的System.Windows.Froms的命名空间问题;
然后是Beta1中的BitAnd 、BitOR等等Bitxxx的函数在Beta2中已去掉了Bit又和VB中一样了(据说Beta1的这项改动遭到了总多VB Fans的投诉,说不能把VB也C#化,Bit是什么东东),这样你需要把这类函数改掉;
然后是NameObjectCollectionBase从原来的system.collections中删除了,Beta2放在system.collections.specialized 中,真的有些昏倒,开始我还以为Beta2中删除了这个类。
最后是一些Overrides和 Overloads的问题,具体的看VS.NET或Framework SDK Beta 2编译时的提示就可以了,这方面MS做得不错,Task list中告诉你具体得建议,照做就是了。
具体一点你可以在Framework SDK Beta 2安装目录的Doc目录中找到这两个文件,这是从Beta1移植到Beta2上不错的指导文件:APIChangesBeta1toBeta2.htm 和Change List - Beta1 to Beta2.doc 特别是这个doc文件洋洋洒洒90多页,但很有帮助。
希望你还能在排除所有的错误之后保持清醒,找到最核心有用的代码,来分析。主要是CActionMenu.vb,焦点在OnMeasureItem和OnDrawItem这两个函数或说事件处理程序上。OnMeasureItem主要是处理MenuItem的ItemHeight和ItemWidth的,从它传的MeasureItemEventArgs参数数就知道。OnDrawItem主要是如何画菜单的问题。关键字Overrides表明我们要在子类中重新定义MenuItem中的这两个方法。
从56行到58行是OnMeasureItem函数:
Protected Overrides Sub OnMeasureItem(ByVal e As System.Windows.Forms.MeasureItemEventArgs)
If Me.Action.Caption = "-" Then
e.ItemHeight = 5
Else
e.ItemHeight = 20
End If
Dim fs As FontStyle
If Me.DefaultItem = True Then fs = fs Or FontStyle.Bold
Dim fnt As New Font("Tahoma", 8, fs)
Dim sf As SizeF = e.Graphics.MeasureString(Me.Action.Caption, fnt)
fnt.Dispose()
e.ItemWidth = CInt(sf.Width) + 20
End Sub
MeasureItemEventArgs提供4个属性Graphis、Index、ItemHeight和ItemWidth。Me相当于C#或Java的this关键字。fnt.Dispose()中Dispose是一个很有意思的函数调用,在以往的Windows编程中象字体、画笔等许多资源都希望快使用快释放,这个语句是用来控制GC(garbage collection)的,意思是我已使用完了这个设备或资源,GC你可以收回了。
从70到146行是有关OnItemDraw函数的:
Protected Overrides Sub OnDrawItem(ByVal e As System.Windows.Forms.DrawItemEventArgs)
' colors, fonts
Dim clrBgIcon, clrBgText, clrText As Color, fs As FontStyle, fnt As Font
Dim b As SolidBrush, p As Pen
Dim fEnabled As Boolean = Not CType(e.State And DrawItemState.Disabled, Boolean)
Dim fSelected As Boolean = CType(e.State And DrawItemState.Selected, Boolean)
Dim fDefault As Boolean = CType(e.State And DrawItemState.Default, Boolean)
Dim fBreak As Boolean = (Me.Action.Caption = "-")
If fEnabled And fSelected And Not fBreak Then
clrBgIcon = Color.Silver
clrBgText = Color.White
clrText = Color.Blue
fs = fs Or FontStyle.Underline
Else
clrBgIcon = Color.Gray
clrBgText = Color.Silver
clrText = Color.Black
End If
If Not fEnabled Then
clrText = Color.White
End If
If fDefault Then
fs = fs Or FontStyle.Bold
End If
fnt = New Font("Tahoma", 8, fs)
' total background (partly to remain for icon)
b = New SolidBrush(clrBgIcon)
e.Graphics.FillRegion(b, New [Region](e.Bounds))
b.Dispose()
' icon?
If Not Me.Action.ActionList Is Nothing Then
Dim il As ImageList = Me.Action.ActionList.ImageList
If Not il Is Nothing Then
Dim index As Integer = Me.Action.Image
If index > -1 And index < il.Images.Count Then
Dim rect As Rectangle = e.Bounds
With rect
.X += 2
.Y += 2
.Width = 16
.Height = 16
End With
e.Graphics.DrawImage(il.Images.Item(index), rect)
End If
End If
End If
' text background
Dim rf As RectangleF
With rf
.X = 18
.Y = e.Bounds.Y
.Width = e.Bounds.Width - .X
.Height = e.Bounds.Height
End With
b = New SolidBrush(clrBgText)
e.Graphics.FillRegion(b, New [Region](rf))
b.Dispose()
' text/line
rf.Y += 3 : rf.Height -= 3
If Not fBreak Then
b = New SolidBrush(clrText)
e.Graphics.DrawString(Me.Action.Caption, fnt, b, rf)
fnt.Dispose()
b.Dispose()
Else
p = New Pen(Color.Black)
rf.Y -= 1
e.Graphics.DrawLine(p, rf.X, rf.Y, rf.Right, rf.Y)
p.Dispose()
End If
' border
If fEnabled And fSelected And Not fBreak Then
p = New Pen(Color.Black)
e.Graphics.DrawRectangle(p, e.Bounds)
p.Dispose()
End If
End Sub
DrawItemEventArgs参数给了你和菜单相关的所有环境和信息,它包括6个属性:Bounds、Font、ForeColor、Graphics、Index、States。如果你以前用过Windows下的GDI函数,那一定很熟悉这些函数,不是很复杂只需要你一点点算术知识和美术观点就可以了,如果你是第一次那么在纸上画几个矩形块就可以了理解和做的很好,比起以前TC下的菜单编程容易得多。主要是作者是如何把Icon画在菜单上的,然后是根据不同的States表现一下菜单的ForeColor, Bounds就是菜单项最前面的表示选中等等的小方块。
好了第二部分涉及到了大部分技术细节了,这里你需要关注的是,如何画出来,下一部分我们来看如何画的好看些,象VS.NET或Office XP那样子。
3. “MenuItemStyle”接口和VS.NET风格的菜单项
这个Project又将切换到C#语言。我是这样想的:先针对普通菜单、Office200风格、VS.NET风格三种情况定义一个统一的接口(interface),其中包括画Icon(DrawIcon)、画分割条(DrawSeparator)、画菜单背景(DrawBackground)、写菜单项的文字(DrawMenuText)等功能;普通、Office2000和VS.NET根据各自不同的情况实现这个接口的Drawxxx的功能。然后从MenuItem继承一个子类,象第二部分讲的那样Overrides 菜单项的两个函数:OnMeasureItem和OnDrawItem,根据不同的风格调用上面实现的接口中的DrawXXX函数就可以了。最后我把这部分都分隔出来放在一个.CS文件中,单独编译成一个VSNET.Menu.DLL,你只用using VSNET.Menu ; 然后就可以象在第一部分那样象使用普通的MenuItem那样来用了,Demo源代码中你还可以看到我定义了IconMenuItem的类,它有一个方法:MenuItemCreator(VSNET.Menu.IconMenuStyle sType , String sText , Bitmap bmp , System.EventHandler eh)可以完成生成需要的MenuItem。本来我想用资源文件或将图片Icon等资源放在一个专门的文件中,然后由这个类来负责从资源文件或外部的类中获得资源CreateMenuItem。但是是第一版,你会看到例程中我仍然用原始的New Bitmap()的方式直接从硬盘拿资源。当我看到它show出来时,先是很开心,然后发现还有许多要改进,想想其实做一个专业的菜单也需要花许多心思。
3 楼
yswoyh [专家分:500] 发布于 2005-12-22 19:14:00
是否可以把程序作成.dll的形式,然后在程序中调用??????
4 楼
大学生 [专家分:10] 发布于 2005-12-22 21:15:00
应该是要重写它的paint方法,具体没有做过,实在是觉得太麻烦
听说.NET2005中可以直接绘制XP风格的控件
5 楼
yswoyh [专家分:500] 发布于 2005-12-22 21:32:00
VS.net 2005能实现XP界面 直接往界面上添加控件就是XP版
6 楼
yswoyh [专家分:500] 发布于 2005-12-22 21:37:00
((此贴转载)) 不知道好不好使!!!!!!!! 我还没有试
拥有xp风格的界面
Windows XP发布时,我们中许多人都为她华丽漂亮的界面折服和兴奋。然而,.NET1.0发布时,我们中又有许多人,包括我自己,对它不支持XP风格感到大失所望。可事实是,在Windows XP(只限于WindowsXP)里.NET支持XP风格,只是还要您做一点小工作。
这篇文章主要参考了http://www.codeproject.com/csharp/dotnetvisualstyles.asp
跟随下面的步骤,使您的程序拥有XP风格的界面,GO!
1. 新建一个Windows应用程序,然后打开AssemblyInfo.cs,修改一下内容,下面的是示例代码:
using System.Reflection;
using System.Runtime.CompilerServices;
[assembly: AssemblyTitle("abc")]
[assembly: AssemblyDescription("abc")]
[assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("")]
[assembly: AssemblyCopyright("")]
[assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")]
[assembly: AssemblyVersion("1.0.0.0")]
[assembly: AssemblyDelaySign(false)]
[assembly: AssemblyKeyFile("")]
[assembly: AssemblyKeyName("")]
2. 往项目添加新项。新添加一个XML文件,将文件命名为 [您的程序名].exe.manifest,[您的程序名]指的是在 ..\bin\debug 文件夹里生成的可执行程序名 。文件的内容示例如下:您只要根据您在AssemblyInfo.cs里所作的设置修改 version="1.0.0.0", name="abc", <description>abc</description> 这几个值就可以了。
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity version="1.0.0.0" processorArchitecture="X86"name="abc"type="win32" />
<description>abc</description>
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls"
version="6.0.0.0"
processorArchitecture="X86"
publicKeyToken="6595b64144ccf1df"
language="*" />
</dependentAssembly>
</dependency>
</assembly>
重新编译程序。 注意,从ButtonBase,GroupBox和Label继承下来的组件必须将FlatStyle属性设为System。
3. 将 [您的程序名].exe.manifest 文件添加到程序的可执行文件
(1)菜单-->文件-->打开,打开..\bin\debug\[您的程序名].exe,现在您可以看到一个资源浏览树;
(2)右击根目录[您的程序名],单击"添加资源...";
(3)在跳出的对话框中单击“自定义...”;
(4)将资源类型命名为RT_MANIFEST,确定;
(5)双击资源树的RT_MANIFEST下的项(一般情况下是101),Copy 文件 [您的程序名].exe.manifest 的内容,粘贴在打开的文件中,粘贴的结果是二进制形式(结果有点奇怪,不用理会);
(6)保存,然后将101项的ID改为1,再保存。注意,不要重新对程序进行编译。
现在,重新打开您的程序,怎么样,界面应该不错吧。
原理:
问题的关键在于comctl32.dll。您搜索一下您的计算机,将发现有两个comctl32.dll。组件的外观就与这两个DLL中的特定资源相联系,它们提供特定的资源用于组件客户区域的绘制。对于继承于ButtonBase,GroupBox和Label的组件,将它们的FlatStyle属性设为System的目的也是为了让系统对组件进行绘制。
默认情况下,系统将使用..\Windows\System32目录下的DLL,您需要做的工作就是告诉系统使用另一个DLL,这就是将 [您的程序名].exe.manifest 文件 添加到可执行文件的目的。
下面是支持XP风格的组件完整列表:
Label,TextBox, RichTextBox, HScrollBox, VScrollBox, ProgressBar, TabControl, MainMenu, ComboBox, ContextMenu, DataGrid, ListBox, ListView, TreeView, DataTimePicker, MonthCalendar, Splitter,TrackBar, StatusBar, ToolBar
我来回复