资源地址: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文件
|
请发表评论