Inno setup封包实战之:迅雷7 innojoy
解包迅雷7,其实有2种办法,,1:用7Z强行解压官方的安装包。这样解压出来的文件目录比较乱,不利于我们重新组合,但是可以看到迅雷7的安装界面的图片资源等等。2:全部默认安装一遍。这种方法比较利于二次封包,重新组合。速度也比较快。我今天例子使用的是官方安装包安装一遍。使用的版本是7.1.8.2298。
开始重组
安装完毕,不要运行,关闭所有浏览器。首先我们来到BHO目录下,保留除如图
图片:1.jpg
所示的文件,其他的一律删除 。其中LikSimulate.dll为让迅雷支持快车旋风专用链的dll文件,原版没有,这个大家随便网上找一个放进去就行了。
进入“Program”目录下,将MiniXmpInstall.exe剪切到其他位置备份保留。然后开始对其他无用文件进行精简,推荐保留下面图所示的文件
图片:2.jpg
ThunderInstaller和XLDoctor以及XLUU这些目录都是迅雷的安装修复文件,我们直接删除掉,他们不起任何作用的。
接下来的addins目录,XP下这个目录在系统盘Documentsand SettingsAll UsersApplicationThunder NetworkThunderaddins。WIN7是在系统
图片:3.jpg
的ProgramDataThunderNetworkThunderaddins。换成inno的变量就是:{commonappdata}Thunder NetworkThunderaddins。我们依据三个原则对addins目录进行精简。1:广告组件坚决不要。2:很少用且托速度的直接咔嚓。3:必须的和实用的组件保留。当然还可以添加一些官方不带的组件,比如流量监控,自动隐藏侧边栏之类的。总之,精简后的addins目录情况如下。其中Community是登录组件,没有他不会显示登录画面,GougouSeach是右边的狗狗搜索,HideTaskInfoAddin是第三方开发的自动隐藏侧边栏(得到了官方的认可的插件),MediaMonitorAddin是迅雷的新增加的网页可下载资源监视组件,minixmp是迷你迅雷看看的组件,下面的三个依次是:离线下载组件,流量监视组件,边下边播组件。这里面有几个官方版本不带,大家自己网上去找,我就不提供了。
关于某些时候skin目录不在PF目录下的情况,我们可以去用户的公用用文档目录去找到他们,并复制到迅雷的安装目录。
要预先为迅雷做些设置可以先启动迅雷,设置完毕,将用户的公用用文档目录下的Profiles文件夹复制到迅雷的安装目录。
好了,现在我们把精简好的迅雷安装目录全部复制出来,保存到另外一个目录备用。其目录如上图所示:下面我们要做的内容就是,对这些文件进行小修补,并完善下,依次建立不带后缀名的几个于迅雷后台上传有关的文件。这几个文件如下图所示:
当然就这样,把这些文件打包释放到目录,是不可能达到我们要的效果的。我们现在要的效果是:安装过程自动注册迅雷的ed2k协议支持,自动添加浏览器支持,可选边下边看,可选边下边播(迷你迅雷看看播放器),自动添加右键菜单,自动添加注册表信息。
首先我们来讲怎么获取迅雷的这些参数,有一个很简单的办法:通过卸载官方版本的迅雷,复制卸载细节,反推安装参数。下面的内容是我从官方迅雷7的卸载过程复制出来的部分对我们有用的东西:
运行: "C:Program FilesThunderNetworkThunderXLUUProgramShellLinkCreater.exe"-deleteallsaveddesktoplink 1
运行: "C:Program FilesThunderNetworkThunderProgramminixmpinstall.exe" /path "C:ProgramFilesThunder NetworkThunder" /uninstall
运行: "C:Program FilesThunderNetworkThunderProgramThunderLiveUD.exe" uninstall Thunder7 7.1.8.2298
运行: "C:Program FilesThunderNetworkThunderProgramThunder.exe" "-deladdinshortcut""-nobughandler" "-unassociate:td""-unassociate:torrent" "-unassociate:downlist""-unassociate:thunderskin" "-unregprotocol:ed2k""-unregprotocol:thunder"
运行: regsvr32 /u /s "C:Program FilesThunderNetworkThunderProgramResInfoCom.dll"
运行: regsvr32 /u /s "C:Program FilesThunderNetworkThunderBHOThunderAgent.dll"
运行: regsvr32 /u /s "C:Program FilesThunderNetworkThunderBHOXunLeiBHO.dll"
运行: regsvr32 /u /s "C:Program FilesThunderNetworkThunderBHOUserAgent.dll"
运行: regsvr32 /u /s "C:Program FilesThunder NetworkThunderComDllsTDAtOnce.dll"
运行: regsvr32 /u /s "C:Program FilesThunderNetworkThunderComDllsUserAgent.dll"
运行: regsvr32 /u /s "C:Program FilesThunderNetworkThunderComDllsTDMediaDetector.dll"
运行: regsvr32 /u /s "C:Program FilesThunder NetworkThunderBHOxlfxctrl.dll"
运行: regsvr32 /u /s "C:Program FilesThunderNetworkThunderBHOMediaMonitor.dll"
运行: regsvr32 /u /s "C:Program FilesThunderNetworkThunderBHOXlBrowserAddin.dll"
运行: "C:Program FilesThunder NetworkThunderBHOExeXlSPIInstall.exe"-u
运行: C:Program FilesThunderNetworkThunderProgramThunderPlatform.exe -UnRegServer
运行: "C:Program FilesThunderNetworkThunderProgramDoctorService.exe" -u
运行: "C:Program FilesThunderNetworkThunderProgramThunderFW.exe" Thunder7.1.8.2298 "C:ProgramFilesThunder NetworkThunderProgramThunder.exe" /u
运行: "C:Program FilesThunderNetworkThunderProgramThunderFW.exe" XLDoctorUI7.1.8.2298 ""C:Program FilesThunderNetworkThunderXLDoctor7.1.8.2298_1ProgramXLDoctorUI.exe"" /u
运行: "C:Program FilesThunderNetworkThunderProgramThunderFW.exe" ThunderLAN(UDP) udp:33674 /u /p
运行: "C:Program FilesThunderNetworkThunderProgramThunderFW.exe" ThunderLAN(TCP) tcp:33673 /u /p
运行: "C:Program FilesThunder NetworkThunderProgramThunderFW.exe"XMP7.1.8.2298 "C:ProgramFilesThunder NetworkThunderProgramXMPBoot.exe" /u
运行: "C:Program FilesThunderNetworkThunderProgramThunderFW.exe" "ThunderLiveUpdate7.1.8.2298" "C:Program FilesThunder NetworkThunderProgramLiveupdateThunderLiveUD.exe"/u
运行: "C:Program FilesThunderNetworkThunderProgramThunderFW.exe" FileLink7.1.8.2298 "C:Program FilesThunderNetworkThunderProgramfilelinkXLFileLink.exe" /u
其中,有关XMPBoot是迅雷看看你的组件卸载,没有这个组件的可以不用考虑卸载的时候加进去。minixmpinstall.exe是迷你迅雷看看播放器卸载,事实上不用在安装过程复制这个安装包到PF目录下面去,我们安装它和卸载他有更加好的方法和参数。XLFileLink.exe这个也不需要,是官方的安装的时候静默在桌面生成那2个狗皮膏药的东西的。我们不需要这个参数。XLDoctorUI.exe这个迅雷医生,我们也无视他,因为我们卡擦了。ShellLinkCreater.exe这个同理,无视之。ThunderLiveUD.exeThunderFW.exe也一样,无视,因为我们的精简版不带这2个流氓进程的。
那么现在和我们安装有关的参数是什么呢?有点基本的常识,通过卸载函数反推一下就得出了迅雷其他的安装参数
迷你迅雷看看那播放器安装参数:minixmpinstall.exe /path C:Program FilesThunder NetworkThunder /install
注册迅雷各种协议和相关信息:
Thunder.exe -unassociate:td -associate:torrent-associate:downlist -associate:thunderskin -regprotocol:ed2k -regprotocol:thunder
注册迅雷各种浏览器支持:
XLNonIESvr.exe -rie -silent -setfirst
XLNonIESvr.exe -rmaxthon -silent -setfirst
XLNonIESvr.exe -ropera -silent -setfirst
XLNonIESvr.exe -rfirefox -silent -setfirst
XLNonIESvr.exe -r360 -silent -setfirst
XLNonIESvr.exe -rtheworld -silent -setfirst
XLNonIESvr.exe -rchrome -silent –setfirst
BHO插件需要注册的DLL:
ThunderAgent.dll
LinkSimulate.dll
XunLeiBHO.dll
XlBrowserAddin.dll
迷你迅雷看看播放器安装参数:
MiniXmpInstall.exe/path 路径 /install
特别提供:
SP1多浏览器支持需要在BHO文件夹保留2个文件:DllXlSPI.dll ExeXlSPIInstall.exe。而且这个安装也简单,直接运行下ExeXlSPIInstall.exe这个程序就行了。卸载的时候带上参数:-u卸载他就行,或者安装的时候也可以带上参数:-i。
参数都知道了,那么剩下的就只写脚本了,其实也简单,知道了参数谁不会写?
那么脚本如下:
#define MyAppName"迅雷7"
#defineMyAppVersion "7.1.8.2298"
#defineMyAppPublisher "睿派克技术论坛"
#define MyAppURL"http://www.repaik.com"
#defineMyAppExeName "Thunder.exe"
[Setup]
AppName={#MyAppName}
MinVersion=0,5.0
AppVersion={#MyAppVersion}
AppPublisher={#MyAppPublisher}
AppPublisherURL={#MyAppURL}
AppSupportURL={#MyAppURL}
AppUpdatesURL={#MyAppURL}
DefaultDirName={pf}ThunderNetworkThunder
DefaultGroupName=迅雷软件迅雷7
AllowNoIcons=true
OutputBaseFilename=Thunder_7.1.8.2298_NoAD_VIP
Compression=lzma/ultra64
SolidCompression=true
InternalCompressLevel=ultra64
VersionInfoVersion=7.1.8.2298
VersionInfoCompany=roustar31
VersionInfoDescription=迅雷7去广告VIP6
VersionInfoTextVersion=7.1.8.2298
VersionInfoCopyright=roustar31
VersionInfoProductName=迅雷7去广告VIP6
VersionInfoProductVersion=7.1.8.2298
AllowCancelDuringInstall=false
DisableProgramGroupPage=true
DisableReadyPage=true
WizardImageFile=I:软件打包软件打包用BMPxunlei7.bmp
WizardSmallImageFile=K:XNlogo1.bmp
SetupIconFile=Icon_1.ico
UninstallDisplayIcon={app}ProgramThunder.exe
UninstallDisplayName=迅雷7.1.8.2298
ChangesAssociations=true
[Languages]
Name:chinesesimp; MessagesFile: compiler:LanguagesChineseSimp.isl
[Messages]
BeveledLabel=睿派克技术论坛 Http://www.repaik.com
WelcomeLabel1=迅雷7.1.8.2298去广告VIP优化版
WelcomeLabel2=%n%n%n程序特性:%n1:基于官方7.1.8.2298版制作,去掉官方的捆绑。%n2:不登陆即可去掉界面所有广告,破解本地VIP6。%n3:包含多款实用的插件,去掉其他无用插件。%n4:彻底屏蔽迅雷后台上传,关闭一切流氓程序。%n5:去掉后台自动获取皮肤和界面皮肤推荐。%n6:自动注册电驴ED2K,BT下载文件协议支持。%n7:全部扩展组件可选安装,支持边下边看。
ExitSetupMessage=迅雷7安装尚未完成。如果你现在退出,软件将不会安装。%n%n你可以在其它时间重新运行安装向导来完成安装。%n%n现在退出安装吗?
[Components]
Name: main;Description: 迅雷主要程序文件; Types: compact full custom; Flags: fixed
Name: main2;Description: 迅雷扩展支持; Types: compact full custom
Name: main2xf;Description: 快车旋风专链支持; Types: compact full custom
Name: main2ie;Description: IE浏览器支持; Types: compact full custom
Name: main2ot;Description: 多浏览器支持; Types: compact full custom
Name: main3;Description: 迅雷扩展插件; Types: full custom
Name: main3kk;Description: 边下边看; Types: full custom
Name: main3gg;Description: 狗狗搜索栏; Types: full custom
Name: main3yy;Description: 我的应用; Types: full custom
Name: main3hi;Description: 侧边栏隐藏; Types: full custom
Name: main3net;Description: 流量监视器; Types: full custom
Name: ink;Description: 程序快捷方式; Types: full compact
Name: inkstart;Description: 开始菜单程序组; Types: full compact
Name: inkdesk;Description: 桌面快捷方式; Types: full compact
Name: inkse;Description: 收藏睿派克; Types: full compact
[Types]
Name: full; Description:推荐安装
Name: compact;Description: 精简安装
Name: custom;Description: 自定义安装; Flags: iscustom
[Files]
;Source:MiniXmpInstall.exe; DestDir: {app}Program; Flags: ignoreversion; Components:main2xmp
Source: 睿派克技术论坛.url;DestDir: {app}; Flags: ignoreversion; Components: main
Source: 睿派克技术论坛.url;DestDir: {userfavorites}; Flags: ignoreversion uninsneveruninstall; Components:inkse
Source:addinsCommunity*; DestDir: {app}addinsCommunity; Flags: ignoreversionrecursesubdirs createallsubdirs; Components: main
Source:addinsGougouSearch*; DestDir: {app}addinsGougouSearch; Flags: ignoreversionrecursesubdirs createallsubdirs; Components: main3gg
Source:addinsHideTaskInfoAddin*; DestDir: {app}addinsHideTaskInfoAddin; Flags:ignoreversion recursesubdirs createallsubdirs; Components: main3hi
Source:addinsUADAddin*; DestDir: {app}addinsUADAddin; Flags: ignoreversionrecursesubdirs createallsubdirs; Components: main3net
Source:addinsMediaMonitorAddin*; DestDir: {app}addinsMediaMonitorAddin; Flags:ignoreversion recursesubdirs createallsubdirs; Components: main
Source:addinsOfflineDownloadTab*; DestDir: {app}addinsOfflineDownloadTab; Flags:ignoreversion recursesubdirs createallsubdirs; Components: main
Source:addinsminixmp*; DestDir: {app}addinsminixmp; Flags: ignoreversionrecursesubdirs createallsubdirs; Components: main3kk
Source:addinsVideoAddin*; DestDir: {app}addinsVideoAddin; Flags: ignoreversionrecursesubdirs createallsubdirs; Components: main3kk
Source: addinsCommunity*;DestDir: {commonappdata}Thunder NetworkThunderaddinsCommunity; Flags:ignoreversion recursesubdirs createallsubdirs; Components: main
Source:addinsGougouSearch*; DestDir: {commonappdata}ThunderNetworkThunderaddinsGougouSearch; Flags: ignoreversion recursesubdirscreateallsubdirs; Components: main3gg
Source:addinsHideTaskInfoAddin*; DestDir: {commonappdata}ThunderNetworkThunderaddinsHideTaskInfoAddin; Flags: ignoreversion recursesubdirscreateallsubdirs; Components: main3hi
Source:addinsUADAddin*; DestDir: {commonappdata}ThunderNetworkThunderaddinsUADAddin; Flags: ignoreversion recursesubdirscreateallsubdirs; Components: main3net
Source:addinsMediaMonitorAddin*; DestDir: {commonappdata}Thunder NetworkThunderaddinsMediaMonitorAddin;Flags: ignoreversion recursesubdirs createallsubdirs; Components: main
Source:addinsOfflineDownloadTab*; DestDir: {commonappdata}ThunderNetworkThunderaddinsOfflineDownloadTab; Flags: ignoreversion recursesubdirscreateallsubdirs; Components: main
Source:addinsminixmp*; DestDir: {commonappdata}ThunderNetworkThunderaddinsminixmp; Flags: ignoreversion recursesubdirscreateallsubdirs; Components: main3kk
Source:addinsVideoAddin*; DestDir: {commonappdata}Thunder NetworkThunderaddinsVideoAddin;Flags: ignoreversion recursesubdirs createallsubdirs; Components: main3kk
Source: BHO*;DestDir: {app}BHO; Flags: ignoreversion recursesubdirs createallsubdirs;Components: main
Source:BHOThunderAgent.dll; DestDir: {app}BHO; DestName: ThunderAgent.dll; Flags:regserver noregerror; Components: main
Source:BHOXunLeiBHO.dll; DestDir: {app}BHO; DestName: XunLeiBHO.dll; Flags:regserver noregerror; Components: main
Source:BHOLinkSimulate.dll; DestDir: {app}BHO; DestName: LinkSimulate.dll; Flags:regserver noregerror; Components: main
Source:BHOXlBrowserAddin.dll; DestDir: {app}BHO; DestName: XlBrowserAddin.dll;Flags: regserver noregerror; Components: main
Source:Program*; DestDir: {app}Program; Flags: ignoreversion recursesubdirscreateallsubdirs; Components: main
Source:Profiles*; DestDir: {app}Profiles; Flags: ignoreversion recursesubdirscreateallsubdirs; Components: main
Source: skin*;DestDir: {app}skin; Flags: ignoreversion recursesubdirs createallsubdirs;Components: main
Source: skin*;DestDir: {commonappdata}Thunder NetworkThunderskin; Flags: ignoreversionrecursesubdirs createallsubdirs; Components: main
Source: Xar*;DestDir: {app}Xar; Flags: ignoreversion recursesubdirs createallsubdirs; Components:main
Source:PluginPlatform*; DestDir: {app}XarPluginPlatform; Flags: ignoreversionrecursesubdirs createallsubdirs; Components: main3yy
Source:layout.xar; DestDir: {app}XarThunder; Flags: ignoreversion recursesubdirscreateallsubdirs; Components: main3yy
Source: Data;DestDir: {app}; Flags: ignoreversion; Attribs: hidden
Source: WIN*;DestDir: {sys}; Flags: ignoreversion uninsneveruninstall onlyifdoesntexist;Components: main
Source: AD;DestDir: {tmp}Thunder NetworkThunder; Flags: ignoreversionuninsneveruninstall
Source:cid_store.dat; DestDir: {sd}UsersPublicThunder Network; Flags: ignoreversionuninsneveruninstall overwritereadonly; Attribs: readonly hidden system
Source:emule_upload_list.dat; DestDir: {sd}UsersPublicThunder Network; Flags:ignoreversion uninsneveruninstall overwritereadonly; Attribs: readonly hiddensystem
Source:pub_store.dat; DestDir: {sd}UsersPublicThunder Network; Flags: ignoreversionuninsneveruninstall overwritereadonly; Attribs: readonly hidden system
Source:cid_store.dat; DestDir: {sd}UsersPublicThunder NetworkDownloadLib; Flags:ignoreversion uninsneveruninstall overwritereadonly; Attribs: readonly hiddensystem
Source:emule_upload_list.dat; DestDir: {sd}UsersPublicThunder NetworkDownloadLib;Flags: ignoreversion uninsneveruninstall overwritereadonly; Attribs: readonlyhidden system
Source:pub_store.dat; DestDir: {sd}UsersPublicThunder NetworkDownloadLib; Flags:ignoreversion uninsneveruninstall overwritereadonly; Attribs: readonly hiddensystem
Source:cid_store.dat; DestDir: {app}Program; Flags: ignoreversion overwritereadonly;Attribs: readonly hidden system
Source:MiniXmpInstall.exe; DestDir: {app}; Flags: ignoreversion overwritereadonly;Components: main3kk
; 注意: 不要在任何共享的系统文件使用 "Flags: ignoreversion"
[Registry]
Root: HKLM;Subkey: SOFTWAREThunder NetworkThunderOemthunder_backwnd; ValueName:instdir; ValueType: String; ValueData: {app}; Flags: uninsdeletekey;Components: main2ie
Root: HKLM;Subkey: SOFTWAREThunder NetworkThunderOemthunder_backwnd; ValueName: dir;ValueType: String; ValueData: {app}; Flags: uninsdeletekey; Components:main2ie
Root: HKLM;Subkey: SOFTWAREThunder NetworkThunderOemthunder_backwnd; ValueName:addinsdir; ValueType: String; ValueData: {app}addins; Flags: uninsdeletekey;OnlyBelowVersion: 0,6.0; Components: main2ie
Root: HKLM; Subkey:SOFTWAREThunder NetworkThunderOemthunder_backwnd; ValueName: addinsdir;ValueType: String; ValueData: {commonappdata}Thunder NetworkThunderAddins;Flags: uninsdeletekey; MinVersion: 0,6.0; Components: main2ie
Root: HKLM;Subkey: SOFTWAREThunder NetworkThunderOemthunder_backwnd; ValueName: Path;ValueType: String; ValueData: {app}ProgramThunder.exe; Flags: uninsdeletekey;Components: main2ie
Root: HKLM;Subkey: SOFTWAREThunder NetworkThunderOemthunder_backwnd; ValueName:Version; ValueType: String; ValueData: 7.1.8.2298; Flags: uninsdeletekey;Components: main2ie
Root: HKCU;Subkey: SoftwareMicrosoftInternet ExplorerMenuExt使用迅雷下载;ValueType: String; ValueData: {app}BHOgeturl.htm; Flags: uninsdeletekey;Components: main2ie
Root: HKCU;Subkey: SoftwareMicrosoftInternet ExplorerMenuExt使用迅雷下载;ValueName: Contexts; ValueType: Dword; ValueData: $22; Flags: uninsdeletekey;Components: main2ie
Root: HKCU;Subkey: SoftwareMicrosoftInternet ExplorerMenuExt使用迅雷下载全部链接;ValueType: String; ValueData: {app}BHOgetAllurl.htm; Flags: uninsdeletekey;Components: main2ie
Root: HKCU;Subkey: SoftwareMicrosoftInternet ExplorerMenuExt使用迅雷下载全部链接;ValueName: Contexts; ValueType: Dword; ValueData: $F3; Flags: uninsdeletekey;Components: main2ie
[Icons]
Name:{group}{#MyAppName}; Filename: {app}Program{#MyAppExeName}; Components:inkstart
Name:{group}{cm:ProgramOnTheWeb,{#MyAppName}}; Filename: {#MyAppURL}; Components:inkstart
Name:{group}{cm:UninstallProgram,{#MyAppName}}; Filename: {uninstallexe};Components: inkstart
Name:{commondesktop}{#MyAppName}; Filename: {app}Program{#MyAppExeName};Components: inkdesk
[Run]
Filename:{app}BHOXLNonIESvr.exe; Parameters: -r ie -silent -setfirst; WorkingDir:{app}BHO; Components: main2ie; StatusMsg: 正在添加IE浏览器支持...;Flags: runhidden
Filename:{app}BHOXLNonIESvr.exe; Parameters: -r maxthon -silent -setfirst; WorkingDir:{app}BHO; Components: main2ot; StatusMsg: 正在添加多浏览器支持...; Flags: runhidden
Filename:{app}BHOXLNonIESvr.exe; Parameters: -r opera -silent -setfirst; WorkingDir:{app}BHO; Components: main2ot; StatusMsg: 正在添加多浏览器支持...; Flags: runhidden
Filename:{app}BHOXLNonIESvr.exe; Parameters: -r firefox -silent -setfirst; WorkingDir:{app}BHO; Components: main2ot; StatusMsg: 正在添加多浏览器支持...; Flags: runhidden
Filename:{app}BHOXLNonIESvr.exe; Parameters: -r 360 -silent -setfirst; WorkingDir:{app}BHO; Components: main2ot; StatusMsg: 正在添加多浏览器支持...; Flags: runhidden
Filename:{app}BHOXLNonIESvr.exe; Parameters: -r theworld -silent -setfirst;WorkingDir: {app}BHO; Components: main2ot; StatusMsg: 正在添加多浏览器支持...;Flags: runhidden
Filename:{app}BHOXLNonIESvr.exe; Parameters: -r chrome -silent -setfirst; WorkingDir:{app}BHO; Components: main2ot; StatusMsg: 正在添加多浏览器支持...; Flags: runhidden
Filename:{app}ProgramThunder.exe; Parameters: -associate:td -associate:torrent-associate:downlist -associate:thunderskin -associate:thunderaddin-regprotocol:ed2k -regprotocol:magnet -regprotocol:thunder; WorkingDir:{app}Program; Components: main; StatusMsg: 正在注册电驴ED2K,BT下载支持...
Filename:{app}Program{#MyAppExeName}; Description: 立即运行迅雷7.1.8.2298; Flags: nowaitpostinstall skipifsilent
Filename: {app}睿派克技术论坛.url;Description: 访问睿派克技术论坛; Flags: shellexec skipifsilentpostinstall runmaximized
Filename:{app}MiniXmpInstall.exe; Parameters: /path {app} /install; WorkingDir: {app};StatusMsg: 正在安装边下边看功能....; Components: main3kk
[UninstallRun]
Filename:{sys}regsvr32.exe; Parameters: "/u /s""{app}BHOThunderAgent.dll"""; WorkingDir: {sys}
Filename:{sys}regsvr32.exe; Parameters: "/u /s""{app}BHOLinkSimulate.dll"""; WorkingDir: {sys}
Filename:{sys}regsvr32.exe; Parameters: "/u /s""{app}BHOXunLeiBHO.dll"""; WorkingDir: {sys}
Filename:{sys}regsvr32.exe; Parameters: "/u /s ""{app}BHOXlBrowserAddin.dll""";WorkingDir: {sys}
Filename:{app}ProgramThunder.exe; Parameters: -unassociate:td -unassociate:torrent-unassociate:downlist -unassociate:thunderskin -unassociate:thunderaddin-unregprotocol:ed2k -unregprotocol:magnet -unregprotocol:thunder; WorkingDir:{app}Program
Filename:{app}ProgramThunderPlatform.exe; Parameters: -UnRegServer; WorkingDir:{app}Program
Filename:{app}MiniXmpInstall.exe; Parameters:/path {app}/uninstall; WorkingDir: {app};Components: main3kk
[Code]
{ RedesignWizardFormBegin} // 不要删除这一行代码。
// 不要修改这一段代码,它是自动生成的。
procedureRedesignWizardForm;
begin
with WizardForm.WizardSmallBitmapImage do
begin
Left := ScaleX(312);
Top := ScaleY(0);
Width := ScaleX(186);
end;
with WizardForm.PageDescriptionLabel do
begin
Width := ScaleX(229);
end;
with WizardForm.PageNameLabel do
begin
Width := ScaleX(277);
end;
{ReservationBegin }
// 这一部分是提供给你的,你可以在这里输入一些补充代码。
{ ReservationEnd}
end;
// 不要修改这一段代码,它是自动生成的。
{RedesignWizardFormEnd } // 不要删除这一行代码。
procedureAboutButtonOnClick(Sender: TObject);
begin
MsgBox('迅雷7去广告VIP版'#13#13'roustar31制作', mbInformation, mb_Ok);
end;
procedureURLLabelOnClick(Sender: TObject);
var
ErrorCode:Integer;
begin
ShellExec('open','http://www.repaik.com', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
end;
procedureURLLabel1OnClick(Sender: TObject);
var
ErrorCode:Integer;
begin
ShellExec('open','http://www.repaik.com', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
end;
procedureInitializeWizard();
var
AboutButton,CancelButton: TButton;
URLLabel:TNewStaticText;
URLLabel1:TNewStaticText;
begin
RedesignWizardForm;
CancelButton :=WizardForm.CancelButton;
AboutButton :=TButton.Create(WizardForm);
AboutButton.Left:= WizardForm.ClientWidth - CancelButton.Left - CancelButton.Width;
AboutButton.Top:= CancelButton.Top;
AboutButton.Width:= CancelButton.Width;
AboutButton.Height:= CancelButton.Height;
AboutButton.Caption:= '程序说明(&A)';
AboutButton.OnClick:= @AboutButtonOnClick;
AboutButton.Parent:= WizardForm;
URLLabel :=TNewStaticText.Create(WizardForm);
URLLabel.Top :=AboutButton.Top + AboutButton.Height - URLLabel.Height - 2;
URLLabel.Left :=AboutButton.Left + AboutButton.Width + ScaleX(20);
URLLabel.Caption:= '睿派克论坛';
URLLabel.OnClick:= @URLLabelOnClick;
URLLabel.Parent:= WizardForm;
URLLabel.Font.Style:= URLLabel.Font.Style + [fsUnderLine];
URLLabel.Font.Color:= clBlue;
URLLabel.Cursor:= crHand;
URLLabel1 :=TNewStaticText.Create(WizardForm);
URLLabel1.Top :=CancelButton.Top - CancelButton.Height - CancelButton.Height -CancelButton.Height;
URLLabel1.Left :=CancelButton.Left - CancelButton.Width - CancelButton.Width;
URLLabel1.Caption:= '点击这里获得更多优化软件';
URLLabel1.OnClick:= @URLLabel1OnClick;
URLLabel1.Parent:= WizardForm.FinishedPage;
URLLabel1.Font.Color:= clFuchsia;
URLLabel1.Cursor:= crHand;
end;
procedureCurUninstallStepChanged(CurUninstallStep: TUninstallStep);
var
ErrorCode:Integer;
begin
if(CurUninstallStep=usPostUninstall) and (UsingWinNT=True) then
if MsgBox('你确定要删除迅雷的下载数据吗?'#13#13'点击是删除,点击否保留', mbConfirmation,MB_YESNO or MB_DEFBUTTON2) = IDYES then
begin
DelTree(ExpandConstant('{app}'), False, True, True);
DelTree(ExpandConstant('{%PUBLIC}')+'Thunder Network', False, True, True);
DelTree(ExpandConstant('{commonappdata}')+'Thunder Network', False, True, True);
DelTree(ExpandConstant('{cf}')+'Thunder Network', False, True, True);
DelTree(ExpandConstant('{%TEMP}')+'Thunder Network', False, True, True);
DelTree(ExpandConstant('{localappdata}')+'Thunder Network', False, True, True);
DelTree(ExpandConstant('{commondocs}')+'Thunder Network', False, True, True);
RegDeleteKeyIncludingSubkeys(HKEY_LOCAL_MACHINE,'SOFTWAREThunder Network')
end;
end;
有了前几节的基础看这节的内容,应该很容易看懂,希望你也可以让网上的修改版迅雷见鬼去,自己DIY一个迅雷吧!
更多阅读
迅雷7如何去广告?迅雷7去除广告的方法 迅雷7怎么去除广告
迅雷作为一款下载软件,受到大家的喜欢,但是迅雷7的广告多的烦人,下面小编为大家讲下如果去掉迅雷7的广告: 开始—运行,输入“%temp%”,回车进文件夹,打开Thunder Network文件夹,进入Thunder文件夹,里面有个AD文件夹
如何加快迅雷下载速度 迅雷9和迅雷7哪个好用
如何加快迅雷下载速度——简介经常有人抱怨自己上网的时候网速过慢,尤其是在用迅雷下载东西的时候,就更是慢得不行了,如何加快迅雷下载速度呢,相信这是很多朋友都急于想知道的事情,一起来看下以下几招吧。如何加快迅雷下载速度——方法/
迅雷7下载到99.9%不动了,没速度了,怎么办? 迅雷下载99.9不动了
迅雷7下载到99.9%不动了,没速度了,怎么办?——简介很多网友用迅雷下载资源的时候出现过进度到99%后就没速度的情况,这种情况属下载BT文件资源居多,经测试发现因BT文件并不完全都支持断点续传,且大多数网友会在下载BT的时候不满意度当时的
实现迅雷7.9去广告 迅雷7.9去广告安装版
1.迅雷7之前的版本的路径都在C:WindowsTemp下进行修改广告文件夹的权限。限制他出现广告内容。2.现在迅雷7.9的广告所在位置发生了改变,打开我系统盘C盘找到C:UsersSeekliAppDataLocalTempThunder NetworkThunder7.9(win7我的系统装
迅雷7.9如何安装幸福树 迅雷7.9幸福树
迅雷7.9如何安装幸福树——简介相信用惯迅雷7的朋友们,都很喜欢迅雷7的幸福树,你可能也领养了一棵吧,然后升级到迅雷7.9后就没有了,怎么办?今天小编给大家分享迅雷7.9如何安装幸福树。迅雷7.9如何安装幸福树——工具/原料迅雷7.9迅雷7.