史上最强大的皮肤控件AlphaControls.用于开发具有独创的皮肤和无皮肤的业务/媒体应用程序。
支持最新版的Delphi and C++ BuilderAlphaControls+最新破解版,内含60个最新皮肤包括VISTA,WLM,WMP11,以及像PPStream一样的。
修复了TsDBNavigator组件的问题
TsSkinManager.Options.ChangeSysColors的默认值更改为False
修复了应用程序在x64编译的错误
改进TsSlider的皮肤
改进菜单皮肤变化的动画
改进SkinManager.Options.StdGlyphsOrder属性
以及其他一些小的更新
1 安装前需先卸载以前的版本,移除IDE里的AlphaControls控件包,然后到bpl文件夹和dcp文件夹,删除所有(acnt*.*)文件,如图1所示:
2.解压压缩包到文件夹,把这个文件夹加到"Library Path";
3.运行Delphi 2010,打开"acnt2010_R.dpk",编译此运行期库,再打开"acnt2010.dpk",安装;
4.安装完毕后,就可以在组件面板上看到AlphaControls组件了,如下图所示:
下面进行测试AlphaControls使用:
1.新建一个应用程序窗体,在窗体上放置一个TsSkinManager;
2.设置TsSkinManager其"SkinDirectory"属性为皮肤Skins文件夹路径;
3.然后再选定其"SkinName"属性所要设置的皮肤名称,比如"UnderWater",如下图所示:
4.设置其"Active"属性为True,编译运行如下图所示:
5.也可以通过设置"InternalSkins"属性,把皮肤文件编译到应用程序里面,记住"SkinName"属性还要选择"UnderWater (内建皮肤)"。
6.另一个重要的控件是TsSkinProvider,放置一个到窗体上,它们的一些代码设置如下:
uses sConst, sDefaults;
procedure TForm1.FormCreate(Sender: TObject);
begin
with sknmngr1 do //TsSkinManager
begin
with AnimEffects do
begin
//-------------------窗体移动时透明度--------------------
BlendOnMoving.Active := False;
BlendOnMoving.BlendValue := 170;
BlendOnMoving.Time := 1000;
//-------------------按钮效果--------------------
Buttons.Events := [beMouseEnter, beMouseLeave, beMouseDown, beMouseUp];
//-------------------对话框隐藏时效果--------------------
DialogHide.Active := True;
DialogHide.Mode := atAero;
DialogHide.Time := 0;
//-------------------对话框显示时效果--------------------
DialogShow.Active := True;
DialogShow.Mode := atFading;
DialogShow.Time := 0;
//-------------------窗体隐藏时效果--------------------
FormHide.Active := True;
FormHide.Mode := atAero;
FormHide.Time := 0;
//-------------------窗体显示时效果--------------------
FormShow.Active := True;
FormShow.Mode := atFading;
FormShow.Time := 0;
//-------------------最小化时效果--------------------
Minimizing.Active := True;
Minimizing.Time := 200;
//-------------------页切换时效果--------------------
PageChange.Active := True;
PageChange.Time := 200;
//-------------------皮肤切换时效果--------------------
SkinChanging.Active := True;
SkinChanging.Mode := atFading;
SkinChanging.Time := 100;
end;
Effects.AllowGlowing := True;//允许按钮和边框图标有特殊发光效果,如Win7的标题按钮发光
ExtendedBorders := True; //基于分层技术的窗体阴影
HueOffset := 0; //允许改变当前皮肤的调色板
IsDefault := True; //定义为当前管理器作为默认的应用程序管理器
with MenuSupport do
begin
ExtraLineFont.Name := '宋体';
ExtraLineWidth := 32; //附加行宽度
IcoLineSkin := 'ICOLINE'; //图标行风格
UseExtraLine := False; //是否使用附加行,
end;
Saturation := 0; //改变当前皮肤的饱和度
SkinnedPopups := True; //弹出菜单是否应用皮肤
SkinningRules := [srStdForms, srStdDialogs, srThirdParty]; //换肤规则
//-------------------让第三方控件也换肤,在属性器里设置比较好-------------------
ThirdLists[ord(tpEdit)].Add('TEdit');
ThirdLists[ord(tpCheckBox)].Add('TCheckBox');
end;
with sknprvdr1 do //TsSkinProvider
begin
AddedTitle.ShowMainCaption := True;//是否显示窗体标题
AddedTitle.Text := '附加的文本'; //允许定义一个额外的文本将在窗体的标题后显示
AllowBlendOnMoving := True; //是否允许窗体移动时透明度
AllowExtBorders := True; //是否允许窗体阴影
CaptionAlignment := taLeftJustify; //标题文本对齐方向
DrawNonClientArea := True; //是否要绘制非客户区
GripMode := gmNone; //当值是gmRightBottom时,窗体右下角有个三角形
MakeSkinMenu := False; //是否在窗体的系统菜单添加“皮肤”菜单项
MenuLineSkin := ''; //菜单显示皮肤样式
ResizeMode := rmStandard; //指定调整大小模式的形式,为rmBorder,则改变时只出现边框
ScreenSnap := False; //指定是否窗体捕捉到屏幕边缘,主动粘边
ShowAppIcon := True; //指定是否应用程序图标将显示在窗体的标题
SnapBuffer := 10; //当ScreenSnap为True,指定窗体边缘和屏幕边缘之间最大像素
//TitleButtons //添加标题按钮
//TitleIcon //添加标题图标
TitleSkin := ''; //标题显示皮肤样式
UseGlobalColor := True; //是否使用全局颜色
end;
end;
7.放置一些控件测试效果,结果如下图所示:
76.4M / 03-25
立即下载55M / 06-05
立即下载237.9M / 04-13
立即下载140.5M / 03-06
立即下载900.9M / 03-02
立即下载96.2M / 07-06
立即下载311.2M / 07-06
立即下载335M / 07-06
立即下载200M / 07-06
立即下载413.8M / 07-06
立即下载353.9M / 06-05
立即下载131.8M / 04-13
立即下载230.8M / 03-03
立即下载195.6M / 03-03
立即下载165.4M / 03-03
立即下载45.6M / 09-08
立即下载665.2M / 07-06
立即下载2.84G / 07-06
立即下载93M / 07-06
立即下载338.3M / 07-06
立即下载1.38G / 07-26
立即下载488.3M / 07-16
立即下载109.8M / 06-03
立即下载142M / 01-08
立即下载1.2M / 11-23
立即下载548.8M / 04-13
立即下载1.6M / 04-13
立即下载1.48G / 03-18
立即下载646.6M / 03-03
立即下载133.7M / 03-03
立即下载325.8M / 06-07
立即下载60M / 04-29
立即下载254M / 04-25
立即下载659M / 04-23
立即下载1M / 12-26
立即下载253.4M / 12-08
立即下载253M / 12-08
立即下载1.19G / 11-16
立即下载110.5M / 04-23
立即下载26.7M / 03-16
立即下载488.3M / 07-16
立即下载248.9M / 12-08
立即下载248.9M / 12-08
立即下载201.2M / 04-13
立即下载100.6M / 03-06
立即下载148.9M / 03-06
立即下载1.12G / 07-06
立即下载1.25G / 07-06
立即下载9.48G / 07-06
立即下载50KB / 07-06
立即下载116.2M / 04-10
立即下载1.92G / 04-17
立即下载201.5M / 04-13
立即下载7.31G / 07-01
立即下载94.3M / 07-06
立即下载2.48G / 07-06
立即下载7.63G / 07-06
立即下载1M / 07-06
立即下载778.1M / 07-06
立即下载509.7M / 07-06
立即下载561.8M / 07-11
立即下载1.32G / 01-19
立即下载72M / 07-06
立即下载548.7M / 07-06
立即下载1.00G / 07-06
立即下载9.13G / 07-06
立即下载126.2M / 07-06
立即下载72M / 07-06
立即下载105.1M / 07-06
立即下载132M / 07-06
立即下载