制作XP窗体的DELPHI控件包

RainXP for Delphi5/6 (Freeware) -------------------------------------------------------------------------------- Version:0.2001.12.28 您好，欢迎使用雨痕工作室出品的控件包。 您可自由传播本软件，但不得修改任何信息，不得应用于任何商业产品和活动中。 本套软件不提供源代码，功能不受任何限制，您可放心使用。 如果可以的话，请告知作者您的软件名称和网站地址。 Copyright (c) RainTrail Studio.China All Rights Reserved! http://q2net.onchina.net mailto:q.yuhen@263.net 安装方法： Delphi5 *********** 1.菜单 Component -> Install Package... 2.在弹出对话框中，单击 Add... 3.选择 RainXP.bpl，单击确定。 4.菜单 Tools -> Environment Options 5.在 Libarary -> Library Path 中添加控件包存放路径 Delphi6 *********** 安装步骤类似。 控件说明： XPForm ************ 制作 WINXP 窗口的可视控件。支持窗体尺寸缩放、焦点切换、磁性吸附、顶层显示等功能。 Properties BoldCaption : 粗体显示标题文字，当 UseSystemFont 时有效。 BorderSytle : 窗体类型。 BtnClose : 是否显示关闭按钮。 BtnHelp : 是否显示帮助按钮。 BtnMax : 是否显示最大按钮。 BtnMin : 是否显示最小按钮。 CaptionOffSet : 调整标题和图标间的距离。 CaptionShadown : 是否显示标题阴影。 ClientPanel : 工作 Panel。 IconOffSet : 上下调整图标位置。 Magent : 磁性窗口吸附距离。 Picture : 窗体图标。 PictureTrans : 透明显示图标。 PictureTransColor : 透明颜色。 TopMost : 顶层显示。 UseSystemFont : 使用操作系统默认字体显示标题。 Methods 无 Events OnActive : 窗体获得焦点时触发。 OnInAcitve : 窗体失去焦点时触发。 OnHelp : 单击帮助按钮时触发。 使用方法： 1. 将控件放置到空白窗体上。 2. 新建一 Panel 到窗体。 3. 设置 XPForm 的 ClientPanel 属性为该 Panel。 4. 调整 XPForm 的属性，并将其他的可视控件放置在 Panel 中。 您可使用 ToolBar 在 XPForm 中添加菜单。请注意以下设置步骤。 1.新建一空白窗口。 2.放置 XPForm 控件。 3.放置一 Panel 控件，并设置 XPForm.ClientPanel:=Panel。 4.添加 MainMenu ，并添加菜单项。 5.清除 Form 的 MainMenu 属性。 6.新建一 ToolBar 放置到 Panel 控件中，设置 ToolBar.AutoSize:=True; ToolBar.Flat:=True; ToolBar.ShowCaption:=True;。 7.在 ToolBar 中建立 ToolButton，将 MainMenu 的 TopMenu 赋值给 ToolButton.MenuItem 属性。(注意在DELPHI6中不能直接将 MainMenu 赋值给 ToolBar 的 Menu 属性，这会造成菜单项无法响应一些事件。) 8.设置每个 ToolButton 的 AutoSize:=True;Grouped:=True; XPUrl ***** 改进的超级连接控件。 Properties Url : http://www.onchina.net mailto:q.yuhen@263.net c:\winnt\notepad.exe 支持以上三种格式 XPButton ******** XPCheckBox ********** XPRaidoBox ********** XPGroupBox ********** XPMatRix ******** 为您的窗体添加《黑客帝国》的背景。 本控件修改自“兄弟工作组” (http://www.vrbrothers.com) 的 MatRix 屏幕保护程序。