intraweb 11.0.63 for delphi7 破解

資源地址：http://download.csdn.net/detail/marszzx/9472912

本資源來自互聯網，整理後上傳，本資源僅供學習使用，請勿做用商業用途

delphi開發網站，彷佛14年開始intraweb很火
因而果斷開始研究intraweb，作了幾個demo，感受吊炸天呀！
一、卸載以前的intraweb(install package裏面先刪除intraweb控件)
二、複雜文件末尾的bat代碼，製做刪除控件的bat
三、運行iw11.0.63.exe安裝intraweb
四、IW11063\下的文件替換到剛纔安裝的intraweb目錄下面

從新打開delphi 建立程序試一下吧

-----------刪除舊版intraweb的bat--------------------------
@echo off
if %PROCESSOR_ARCHITECTURE%==x86 (set "var=d:\Program Files") else set "var=d:\Program Files (x86)"
echo "正在刪除舊版IntraWeb文件......"
echo "Delphi7目錄爲:"
echo %var%\Borland\Delphi7\
del /s "%var%\Borland\Delphi7\Lib\SWSystem.dcu
del /s "%var%\Borland\Delphi7\Lib\SWService.dcu
del /s "%var%\Borland\Delphi7\Lib\SWStrings.dcu
del /s "%var%\Borland\Delphi7\Lib\IWRegisterControl.dcr
del /s "%var%\Borland\Delphi7\Lib\IWRegisterApplication.dcr
del /s "%var%\Borland\Delphi7\Lib\IWMain.res
del /s "%var%\Borland\Delphi7\Lib\iwmain.dcu
del /s "%var%\Borland\Delphi7\Lib\IWInitISAPI.dcu
del /s "%var%\Borland\Delphi7\Lib\IWInitApacheTwo.dcu
del /s "%var%\Borland\Delphi7\Lib\IWInitApacheTwo.dcu
del /s "%var%\Borland\Delphi7\Lib\IWInitApache.dcu
del /s "%var%\Borland\Delphi7\Lib\IWInit.dcu
del /s "%var%\Borland\Delphi7\Lib\IWHTTPServer.dcu
del /s "%var%\Borland\Delphi7\Lib\InThreadSafe.dcu
del /s "%var%\Borland\Delphi7\Lib\InThread.dcu
del /s "%var%\Borland\Delphi7\Lib\InTCPStream.dcu
del /s "%var%\Borland\Delphi7\Lib\InTCPServer.dcu
del /s "%var%\Borland\Delphi7\Lib\InTCPConnection.dcu
del /s "%var%\Borland\Delphi7\Lib\InSync.dcu
del /s "%var%\Borland\Delphi7\Lib\InStrings.dcu
del /s "%var%\Borland\Delphi7\Lib\InStream.dcu
del /s "%var%\Borland\Delphi7\Lib\InStackWindows.dcu
del /s "%var%\Borland\Delphi7\Lib\InStackConsts.dcu
del /s "%var%\Borland\Delphi7\Lib\InStack.dcu
del /s "%var%\Borland\Delphi7\Lib\InSSLOpenSSLHeaders.dcu
del /s "%var%\Borland\Delphi7\Lib\InSSLOpenSSL.dcu
del /s "%var%\Borland\Delphi7\Lib\InSocks.dcu
del /s "%var%\Borland\Delphi7\Lib\InSocketHandle.dcu
del /s "%var%\Borland\Delphi7\Lib\InServerIOHandlerSocket.dcu
del /s "%var%\Borland\Delphi7\Lib\InServerIOHandler.dcu
del /s "%var%\Borland\Delphi7\Lib\InResourceStrings.dcu
del /s "%var%\Borland\Delphi7\Lib\InIOHandlerSocket.dcu
del /s "%var%\Borland\Delphi7\Lib\InIOHandler.dcu
del /s "%var%\Borland\Delphi7\Lib\InHTTPWebBrokerBridge.dcu
del /s "%var%\Borland\Delphi7\Lib\InHTTPHeaderInfo.dcu
del /s "%var%\Borland\Delphi7\Lib\InHeaderList.dcu
del /s "%var%\Borland\Delphi7\Lib\InGlobal.dcu
del /s "%var%\Borland\Delphi7\Lib\InException.dcu
del /s "%var%\Borland\Delphi7\Lib\InCustomHTTPServer.dcu
del /s "%var%\Borland\Delphi7\Lib\InCookie.dcu
del /s "%var%\Borland\Delphi7\Lib\InComponent.dcu
del /s "%var%\Borland\Delphi7\Lib\InCoderMIME.dcu
del /s "%var%\Borland\Delphi7\Lib\InCoder3to4.dcu
del /s "%var%\Borland\Delphi7\Lib\InCoder.dcu
del /s "%var%\Borland\Delphi7\Lib\InBaseComponent.dcu
del /s "%var%\Borland\Delphi7\Lib\InAuthentication.dcu
del /s "%var%\Borland\Delphi7\Lib\InAssignedNumbers.dcu
del /s "%var%\Borland\Delphi7\Lib\InAntiFreezeBase.dcu
del /s "%var%\Borland\Delphi7\Lib\InURI.dcu
del /s "%var%\Borland\Delphi7\Lib\InWinSock2.dcu
del /s "%var%\Borland\Delphi7\Lib\InIntercept.dcuSWSystem.dcu"
rd /s /q "%var%\Borland\Delphi7\Source\IntraWeb\"
del /s "%var%\Borland\Delphi7\*intraweb*.*"
del /s "%var%\Borland\Delphi7\iw*.*"
if %PROCESSOR_ARCHITECTURE%==x86 (set "var=d:\WINDOWS\system32") else set "var=d:\Windows\SysWOW64\"
echo "Sys目錄爲:"
echo %var%
del /s "%var%\Intraweb_50_70.bpl"
del /s "%var%\IntrawebDB_50_70.bpl"

echo "正在刪除註冊表中IntraWeb殘存......"
reg delete HKEY_CURRENT_USER\Software\Borland\Delphi\7.0\Known" "Packages\ /v c:\program" "files\borland\delphi7\Bin\dclIntraweb_50_70.bpl /f
reg delete HKEY_CURRENT_USER\Software\Borland\Delphi\7.0\Known" "Packages\ /v c:\program" "files" "(x86)\borland\delphi7\Bin\dclIntraweb_50_70.bpl /f
pause
/////////////////////////////////////////////

-----------刪除舊版intraweb的bat--------------------------

一、打開delphi 提示intraweb的版本不對，用破解版文件替換安裝後的文件夾
二、提示IWLicenseKey文件信息的，從新安裝，在提示版本不對的狀況創建一個項目編譯執行無論它
目的是生成IWLicenseKey.dcu,
以後用破解版文件夾替換安裝後的文件夾
刪除\libD7\IWLicenseKey.pas文件