VclSkin v2.60 更新说明:
*支持阿拉伯语言,BiDiMode靠右对齐。
*修正了程序关闭的若干错误。
破解版中的已知问题已经修正,D7版的已经测试能用,D5、D6没有测试,应该能用。
Name Price Description
Standard Edition with Single License $75 for single developer use, without source code .
Professional Edition with Single License $149 for single developer use, with source code
Professional Edition with 4 Licenses $299 for 4 developers use, with source code
Professional Edition with 8 Licenses $499 for 8 developers use, with source code
Professional Edition with Site Licenses $899 for company use, with source code.
我准备买一套Professional Edition with Single License,有谁一起来集资?
联系我:FireRoseSoft@Msn.com
重新发布说明:由于控件作者更新修正BUG,现在重新发布。
///////////////////////////////////////
uses winskindlg;
Type
TMySkinManage=class(TSkinManage);
procedure TForm1.btn1Click(Sender: TObject);
//破解后的2.6版不能够动态改变窗体的caption,下面是补充解决办法
var
P: Pchar;
begin
P := Pointer(TMySkinManage(SkinManager).FindSkinForm(Handle));
if P = nil then exit;
P := P+104; //D5的话请将104改为88,未经测试
Pstring(P)^ := '好';
Caption := '好';
end;