第一步,先从老家下载回来:https://www.alphaskins.com/sfiles/stable/acnt_dx10sydney.zip
(因为我的Delphi 是10.4.1 sydney悉尼版,所以当然下载这个啦)
你要是还需要编译输出64位的,那么 https://www.alphaskins.com/sfiles/stable/acnt_dx10sydney_x64.zip 也得下载回来
Ctrl+Alt+F11中增加64位的编译输出时才会用到,因为我用不到,所以就不用了。
这里还有一些其他的东东:https://www.alphaskins.com/dwnld.php,呵呵~~ 上来一般都是走走看看。
第二步,把上面下载到的压缩包解出来
当前目录下有两个demo字样的文件夹,建议移入自建的目录中去
其他文件夹,根据名字也能知道是干什么用的了。
在 X:\Delphi关联安装外部控件\alphaskins\Skins 这个目录中有一个下载全部的英文网页文件,双击就会用IDM下载一个ZIP文件,里边就是网站上的全部皮肤文件了。
第三步,我们开始安装控件吧。
看了一眼 https://www.alphaskins.com/showdoc.php?l=en&n=1
用everything搜索下以下文件
A.Delphi中==》tools==》options===>搜索library path===> ;X:\Delphi关联安装外部控件\alphaskins\DX10Sydney 加进去
B. 先用Delphi打开 , X:\Delphi关联安装外部控件\alphaskins\DX10Sydney\acntDX10Sydney_R.dpk 这个,来到右边(Ctrl+Alt+F11)在BPL上右击菜单中选择Build
C.再用Delphi打开 , X:\Delphi关联安装外部控件\alphaskins\DX10Sydney\acntDX10Sydney.dpk 这个,来到右边(Ctrl+Alt+F11))在BPL上右击菜单中选择Install
它会先后两次弹框,告诉你组件注册成功了,现在随便打开一个demo文件,F9编译看下运行的效果吧。
效果还是不错的啊~~
是不是心痒能耐? 想自己从头搞个皮肤玩玩?
拖一个控件上去
然后把图中所示的地方 修改1下
路径你得改成刚才上面咱们看到的那里!
然后这个下拉菜单项列表就被激活了,随便点一个吧。
我感觉比MiSkin强姥姥去了~~
然后 每次拉控件时,或 F9 编译EXE时,上面这个总出来,是不是很不爽呢?
[Asm] 纯文本查看 复制代码 00839F4E |> \E8 41FFFCFF call AMegaDem.00809E94 ; al返回1 会如何?里边竟然第一眼看到了IsDebuggerPresent
00839F53 |. 84C0 test al, al
00839F55 7534 jmp short AMegaDem.00839F8B ; 线索1,貌似这可跳过?果然成功!
00839F57 |. 8B73 60 mov esi, dword ptr ds:[ebx+0x60]
00839F5A |. 8BC6 mov eax, esi
00839F5C |. 8B15 F82E4500 mov edx, dword ptr ds:[0x452EF8] ; AMegaDem.00452F50
00839F62 |. E8 91E7BCFF call AMegaDem.004086F8
00839F67 |. 84C0 test al, al
00839F69 |. 74 06 je short AMegaDem.00839F71
00839F6B |. F646 1C 10 test byte ptr ds:[esi+0x1C], 0x10
00839F6F |. 75 1A jnz short AMegaDem.00839F8B
00839F71 |> 803D 19FD9500 00 cmp byte ptr ds:[0x95FD19], 0x0
00839F78 |. 75 11 jnz short AMegaDem.00839F8B
00839F7A |. C605 19FD9500 01 mov byte ptr ds:[0x95FD19], 0x1
00839F81 |. B8 C09F8300 mov eax, AMegaDem.00839FC0 ;UNICODE "Trial version of the AlphaControls package has been used.
For purchasing the fully functional versi"
我们尝试下能否干掉? 哈哈,成功了。
先吃饭,吃完饭,再找找其他需要修改的其他文件吧。 |