因为目前没有时间可以管理评论,所以暂停评论功能!2009.12.19
第二步,在config.xml文件中定义这些资源的属性。
定义组件属性的格式可以参考第一部分第3点(即“3按钮的定义”),然后在这个格式的基础上添加相关属性,相关属性可以参考第一部分第2点(即“2按钮的属性”)。如果在第一步中没有图标、图片等资源,在这里可以将组件定义为文本,文本的代码模板为:
<Text id="…" left="…" top="…" width="…" height="…" zIndex="…" value="…" color="…" hoverColor="…" fontFamily="…" fontSize="…" fontWeight="…" toolTip="…" cursor="*.cur" active="true" visible="true" link="false"/>
(注:各属性的取值可以参考其他组件)
还有一个更简单的方法:把别的按钮或文本的代码COPY过来,然后将相关属性的值改成自己的。
也许有人会问,添加的代码要放到config.xml文件中具体什么位置呢?只要遵守以下两条规则,代码存放的位置是任意的。
规则一:在config.xml文件的开头有这样一段代码:
<?xml version="1.0" encoding="gb2312"?><theme version="1.0">
在config.xml文件的结尾有这样一段代码:
</Window>
</theme>
添加的代码要位于上述两段代码之间。
规则二:添加的代码不能“拆散”已有组件的代码。例如有如下代码:
<Button ……>
<Icon ……/>
<Label ……>
</Button>
我们添加的代码可以位于这段代码之前,也可以位于这段代码之后,但千万不要加在这段代码的中间。
第三步,在VBScript文件调用这些资源并定义相关功能。
如果组件是靠右下角对齐的(跳过第二部分的现在返回去看一下第二部分的第2点:2.定义按钮在面板中的位置。很容易看懂的),还要在VBScript文件中定义组件的位置。定义组件位置的代码添加到什么位置呢?在VBScript文件中找到以下代码:
SearchButton.top = cy - 25
MsgManagerButton.top = cy – 25
将定义组件位置的代码添加到上面这段代码的下一行。
下面来定义组件的功能函数。
功能函数的代码模板是:
sub IPButton_onClick()
tmp="showip.exe"
Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(tmp)) Then
Set objShell = CreateObject("Wscript.Shell")
objShell.Run tmp
else
msgbox "发现错误啦!" & chr(10) & "找不到QQ安装目录下的showip.exe文件",,"错误提示"
end if
End Sub
这其实是IP升级器的代码,我们只需要修改其中几处,就可以变成自己的代码:将第一行的IPButton改为所添加组件的 id ;将第二行和第八行中的showip改成外部程序的可执行主程序的名字。
一般皮肤(包括原版皮肤)的VBScript文件中都有下面这句注释:
'处理QQ程序发来的事件
将我们修改好的功能函数代码放到这段注释的上面即可。
第四步,修改VBScript.dll文件。
QQ自带的vbscript.dll文件并不支持调用了外部程序,所以要使用破解的vbscript.dll文件。这也是为什么用我修改的QQ皮肤还要覆盖原版QQ中的vbscript.dll文件的原因。
破解的vbscript.dll文件下载地址为: http://esoft.bokee.com/inc/vbscript.rar
======全球免费中心版权声明(本站从09-4-29开始加强免费资源版权管理)=========
不管出于何目的转载本文,请注明版权信息(包括来源和作者),否则一经发现将逐个处理。
若本站转了您的信息而未标明或标错或未找到出处而没标明的,请联系我们,2天内处理。
因为目前没有时间可以管理评论,所以暂停评论功能!2009.12.19