TheWorld 1.2RC2预发布 TheWorld

breath

1.2RC2

下载工具支持讯雷，WellGet

改进了工具条前进后退图标，仍然使用和IE相同的图标，解决缺省图标在不同背景时候的锯齿问题
(这个问题在使用皮肤的时候不会出现，因为皮肤都是自设的背景)
新增了三个按钮：开关侧边栏、网页编码和清理痕迹 - 1.2Final之前不会再增删按钮了，以前的皮肤将在1.2Final发布前重新整理
侧边栏标签自画时使用双缓冲，避免闪烁
标签条增加了自动刷新图标

解决了将配置从ini和注册表间移动的时候，丢失某些设置的问题
解决了两个内存泄露导致内存变大的问题
解决了一个自动刷新导致内存变大的问题
降低了虚拟内存占用
优化了速度，降低了假死问题发生的概率

附件为完整安装版，和绿色精简版

xwhyc

版主，没发现有迅雷啊，是不是搞漏了

[FlashGet]
ProgID=JetCar.Netscape
Script=On Error Resume Next:set JetCarCatch=CreateObject("JetCar.Netscape"):if err<>0 then:MsgBox("FlashGet not properly installed!"+ vbCrLf+"Please install FlashGet again"):else:call JetCarCatch.AddUrl("%d_url","%d_info","%page.url"):end if

[NetAnts]
ProgID=NetAnts.API
script=On Error Resume Next:set NetAntsApi=CreateObject("NetAnts.API"):if err<>0 then:MsgBox("NetAnts not properly installed on this PC!"):else:if NetAntsApi.IsUrlExist("%d_url") then : MsgBox("%d_url"+vbCrLf+"already in queue"):else:call NetAntsApi.AddUrl("%d_url", "%d_info", "%page.url"):end if
       
[ReGet]
ProgID=ClickCatcher.DownloadFromContextMenu
script=On Error Resume Next\nset Application=CreateObject("ClickCatcher.DownloadFromContextMenu")\nif err<>0 then\nMsgBox("ClickCatcher not properly installed on this PC!")\nelse\nApplication.Url = "%d_url"\nApplication.Info = "%d_url"\nApplication.Referer = "%page.url"\ncall Application.AddDownload()\nend if

[HiDownload]
ProgID=NetMoles.NetMoles
script=On Error Resume Next\nset NetMolesApi=CreateObject("NetMoles.NetMoles")\nif err<>0 then\nMsgBox("NetMoles not properly installed on this PC!")\nelse\nNetMolesApi.NMAddUrl "%d_url", "%page.url"\nend if

[DLExpert]
ProgID=dlexpertapi
script=On Error Resume Next\nset dlexpertapi= CreateObject("dlexpertapi")\nif err<>0 then\nelse\ncall dlexpertapi.addjob("%d_url","%page.url")\n\nend if

[WellGet]
ProgID=NxApi.myComponent
script=On Error Resume Next\nset WGApi=CreateObject("NxApi.myComponent")\nif err<>0 then\nelse\ncall WGApi.AddUrl("%d_url","%download_info","%page.url")\n\nend if

[Download Express]
ProgID=Mdpph.API.1
script=On Error Resume Next:set DP=CreateObject("Mdpph.API.1"):if err<>0 then:MsgBox("download express is not installed yet"):else:call DP.DownloadFile("%d_url","%d_info","%page.url"):end if

[Intertnet Download Accelerator]
ProgID=idaie.moveurlida
script=On Error Resume Next:set IDACOMObj=CreateObject("idaie.moveurlida"):if err<>0 then:MsgBox("ActiveX automation object placed in IDAIE.DLL is not registered or corrupted. Please try reinstall Internet Download Accelerator"):else:call IDACOMObj.AddURL("%d_url", "%page.url"):end if

[Mass Downloader]
ProgID=MassDown.AddUrl.1
script=On Error Resume Next:set MassDown=CreateObject("MassDown.AddUrl.1"):if err<>0 then:MsgBox("MassDown.dll is not registered. Please run `regsvr32.exe MassDown.dll"):else:call MassDown.AddUrlWithReferer("%d_url", "%download_info", "%page.url"):end if

[Star Downloader]
ProgID=sdext.stardownext
script=On Error Resume Next:set SDIE=CreateObject("sdext.stardownext"):if err<>0 then:MsgBox("sdext.dll could not be found. Please re-install Star Downloader"):else:call SDIE.DownloadURL("%d_url", "%page.url"):end if

[Download Master]
ProgID=dmie.moveurl
script=On Error Resume Next:set DMCOMObj=CreateObject("dmie.moveurl"):if err<>0 then:MsgBox("ActiveX automation object placed in DMIE.DLL is not registered or corrupted. Please try reinstall Download Master"):else:call DMCOMObj.AddURL("%d_url", "%page.url"):end if

[LeechGet]
ProgID=LeechGetIE.AddURL
script=On Error Resume Next:set LeechGet=CreateObject("LeechGetIE.AddURL"):if err<>0 then:MsgBox("LeechIE.dll is not registered. Please run `regsvr32.exe LeechIE.dll'"):else:call LeechGet.AddUrl("%d_url"):end if

[LeechGet 2004]
ProgID=LeechGetIE.LeechIE
script=On Error Resume Next:set LeechGet=CreateObject("LeechGetIE.LeechIE"):if err<>0 then:MsgBox("download express is not installed yet"):else:call LeechGet.AddUrl("%d_url"):end if

[DAP]
ProgID=dapie.catcher
script=On Error Resume Next:set DAPExt=CreateObject("dapie.catcher"):if err<>0 then:MsgBox("DAPIE.DLL is not registered or corrupted. Please re-install Download Accelerator Plus"):else:call DAPExt.MenuUrl("%d_url", "%page.url", ""):end if

[FreshDownload]
ProgID=fdcatch.fdnscatcher
script=On Error Resume Next:set FD=CreateObject("fdcatch.fdnscatcher"):if err<>0 then:MsgBox("FDCatch.dll is not registered or corrupted. Please re-install Fresh Download"):else:call FD.AddUrl("%d_url", "%page.url", 0):end if


[NetTransport2]
ProgID=NTIEHelper.NTIEAddUrl
Script=On Error Resume Next:set Obj=CreateObject("NTIEHelper.NTIEAddUrl"):if err<>0 then:MsgBox("NetTransport2 not properly installed!"+ vbCrLf+"Please install NetTransport2 again"):else:call Obj.AddLink("%d_url","%d_url","%d_info"):end if

wubo1981

安装了完整版还是找不到啊？？？怎么办?

red-M

绿色的没有写注册表的话tw从哪里读取它啊？

wubo1981

我也是还支持绿色版讯雷，下个完整版试试看行不行。

江风山月

老大，能否在final之前，把自带的“世界之窗”的皮肤再打磨一下。
标签的颜色，标签上进度条的颜色，标签上那个蓝色的小方块，等等，
虽然说不出哪里不好，可是觉得还有改进的空间。

还有菜单的高亮项目背景，菜单的风格等 ^_^

[ Last edited by 江风山月 on 2005-7-6 at 07:51 AM ]

youth9999

Originally posted by ynkm169 at 2005-7-5 12:06 PM:
怎么不见了标准按钮？？？

偶也遇到此问题～～

江风山月

厉害！
不过工具栏图标换成经典的也不错，只要没有锯齿就行！！！

skyun

开始测试。不辜负我打开浏览器第一时间到论坛转悠一下的心情啊。
哈
希望一切都好。会更好。

xwhyc

Originally posted by livealive at 2005-7-5 07:56 PM:
工具栏字体大小按钮没有下拉菜单了。

是啊，你还观察的真仔细！

livealive

工具栏字体大小按钮没有下拉菜单了。

竹舞

下载工具支持讯雷???为什么我还不能用呢，我下载的是绿色版的，不会又让我下完整版吧？