Inno setup封包实战之:迅雷7 innojoy

官方的迅雷7安装包界面华丽(界面模仿不在本节的讨论中),但是体积也比较大,包含了和下载无关的很多垃圾捆绑(这个也不能怪人家,不搞那些蛋疼的东西没有收入啊,你叫人家怎么活?)。本次的主要内容就是对迅雷7的安装包进行精简,重组,加入一些实用的东西,比如说DDR出品的迅雷专用链模拟dll文件。本次内容不包括去广告,请需要去广告的自行实用补丁或者自己去广告或者想办法吧。

解包迅雷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
Inno setup封包实战之:迅雷7 innojoy

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一个迅雷吧!

  

爱华网本文地址 » http://www.413yy.cn/a/25101013/175543.html

更多阅读

如何加快迅雷下载速度 迅雷9和迅雷7哪个好用

如何加快迅雷下载速度——简介经常有人抱怨自己上网的时候网速过慢,尤其是在用迅雷下载东西的时候,就更是慢得不行了,如何加快迅雷下载速度呢,相信这是很多朋友都急于想知道的事情,一起来看下以下几招吧。如何加快迅雷下载速度——方法/

实现迅雷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.

声明:《Inno setup封包实战之:迅雷7 innojoy》为网友素描那片天分享!如侵犯到您的合法权益请联系我们删除