资源地址：http://download.csdn.net/detail/marszzx/9472912
本资源来自互联网，整理后上传，本资源仅供学习使用，请勿作用商业用途
delphi开发网站，似乎14年开始intraweb很火
于是果断开始研究intraweb，做了几个demo，感觉吊炸天呀！
1、卸载之前的intraweb(install package里面先删除intraweb控件)
2、复杂文件末尾的bat代码，制作删除控件的bat
3、运行iw11.0.63.exe安装intraweb
4、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--------------------------
1、打开delphi 提示intraweb的版本不对，用破解版文件替换安装后的文件夹
2、提示IWLicenseKey文件信息的，重新安装，在提示版本不对的情况建立一个项目编译执行不管它
目的是生成IWLicenseKey.dcu,
之后用破解版文件夹替换安装后的文件夹
删除\libD7\IWLicenseKey.pas文件
