-
在Delphi / C++ Builder 10.1 Berlin中安装Intraweb 14.1.5版本
资源介绍
delphi / c++ builder 10.1 Berlin 安装Intraweb 14.1.5，仅供学习研究使用
说明：仅供学习研究使用
安装程序太大无法上传，请先到http://www.atozed.com下载iw14.1.5.exe
本人用的是Embarcadero RAD Studio 10.1 Berlin up2
1. 打开IDE，Component / Install Packages...,选择旧版本Intrawebxxxx.bpl，Remove.
2.用IWBundledRemovalTool工具将旧版本文件删除(如果没有此工具可从网上下载或先随便安装一个版本，把此工具复制出来)。
3.如果需要用bcb开发由进行这一步，如只需要用delphi开发则可跳过这步，
将C:\Program Files (x86)\Embarcadero\Studio\18.0\include\windows\vcl目录下IW*.hpp删除。
4.如果需要用bcb开发由进行这一步，如只需要用delphi开发则可跳过这步，本人前几次安装都没有成功，
后面增加了这步，不知道此步是否必须，
将C:\Program Files (x86)\Embarcadero\Studio\18.0\include\windows\vcl目录下，
从InAntiFreezeBase.hpp开始选中到InYarn.hpp,然后将这些文件删除。
5.运行iw14.1.5.exe安装，安装时输入如下LicenseKey(这个号也是网上找到的，由于找了一天也不记得在哪找到的了，感谢作者提供):
+0010AAIACIABCAACABCACGABCABAAAGACGABCAAGABEAAEABEABIABEAAGABEAAIABCAACABCACEABEABGABEAAAAAAACGAAAACAAAIAAGABCADAABCACGABEAAAABCAACABCACIABEABIAAGACGAAIAACABEAAIABCADAABEACAABCABAABCAAIAAEAAAABAAAGABCADAABCABCABEAAIABEABEABCAACABEAAEABCABAAAAACGAAAACAAAIAAIABCABAABEABCABCABAABCACEABCADAABEAAAABCABAABEAAEAAGACGABCAAGABEAAEABEABIABEAAGABEAAIABCAACABCACEABEABGABEAAAAAAACGAAAACAAAIABAABEABGABEAAAABCABIABEAAEABCAACABEAAIABCABIABCADAABCACIAAGACGAAGABAAAGABGAAGABCAAGAAAAAGABGAAAACGAAAACAAAIABAABCAAIABCABIABEAAIABCABIABCADAABCACIAAGACGAAIABAAAIACIABAAAIAAAACGAAAACAABAAAGABCABAABEAAEABCABIABCAACABCACEAAIACIABCADAAAGACGAAGAAEAAGAAAAAGAACAAGABCAAGABAAAGAAAAAGABCAAGABGAAGABGAAAACGAAAACAAAIABAABCACGABCAACABCABIABCACEAAGACGAAAACGAAAACAAAIABGABCAACABEAAGABCABGAAGACGAAAACGAAAACAAAHAEDAAFACI
6.安装完成后如果选中License Registration则同样输入上面的LicenseKey。
7.先启动Delphi 10.1 Berlin IDE，Tools/Options,将iw14.1.5.exe安装目录(本人安装到C:\Program Files (x86)\IntraWeb XIV)下的LibD10_1W32、LibD10_1W64、Source三个目录添加到Library Path和Browsing Path。
8.随便创建一个Intraweb应用，选择win32平台，然后运行，报错后修改IWLicenseKey.pas:
将SetLicenseKey(xxxxxxxxxxxxxxxxxx改为：
SetLicenseKey(
'+0010AAIACIABCAACABCACGABCABAAAGACGABCAAGABEAAEAB'+
'EABIABEAAGABEAAIABCAACABCACEABEABGABEAAAAAAACGAAA'+
'ACAAAIAAGABCADAABCACGABEAAAABCAACABCACIABEABIAAGA'+
'CGAAIAACABEAAIABCADAABEACAABCABAABCAAIAAEAAAABAAA'+
'GABCADAABCABCABEAAIABEABEABCAACABEAAEABCABAAAAACG'+
'AAAACAAAIAAIABCABAABEABCABCABAABCACEABCADAABEAAAA'+
'BCABAABEAAEAAGACGABCAAGABEAAEABEABIABEAAGABEAAIAB'+
'CAACABCACEABEABGABEAAAAAAACGAAAACAAAIABAABEABGABE'+
'AAAABCABIABEAAEABCAACABEAAIABCABIABCADAABCACIAAGA'+
'CGAAGABAAAGABGAAGABCAAGAAAAAGABGAAAACGAAAACAAAIAB'+
'AABCAAIABCABIABEAAIABCABIABCADAABCACIAAGACGAAIABA'+
'AAIACIABAAAIAAAACGAAAACAABAAAGABCABAABEAAEABCABIA'+
'BCAACABCACEAAIACIABCADAAAGACGAAGAAEAAGAAAAAGAACAA'+
'GABCAAGABAAAGAAAAAGABCAAGABGAAGABGAAAACGAAAACAAAI'+
'ABAABCACGABCAACABCABIABCACEAAGACGAAAACGAAAACAAAIA'+
'BGABCAACABEAAGABCABGAAGACGAAAACGAAAACAAAHAEDAAFAC'+
'I');
再次运行成功，这样以后就可以开发非体验版的win32 Intraweb应用了。
9.同样再次随便创建一个Intraweb应用，选择win64平台，运行报错后同样
修改IWLicenseKey.pasSetLicenseKey(xxxxxxxxxxxxxxxxxx改为：
SetLicenseKey(
'+0010AAIACIABCAACABCACGABCABAAAGACGABCAAGABEAAEAB'+
'EABIABEAAGABEAAIABCAACABCACEABEABGABEAAAAAAACGAAA'+
'ACAAAIAAGABCADAABCACGABEAAAABCAACABCACIABEABIAAGA'+
'CGAAIAACABEAAIABCADAABEACAABCABAABCAAIAAEAAAABAAA'+
'GABCADAABCABCABEAAIABEABEABCAACABEAAEABCABAAAAACG'+
'AAAACAAAIAAIABCABAABEABCABCABAABCACEABCADAABEAAAA'+
'BCABAABEAAEAAGACGABCAAGABEAAEABEABIABEAAGABEAAIAB'+
'CAACABCACEABEABGABEAAAAAAACGAAAACAAAIABAABEABGABE'+
'AAAABCABIABEAAEABCAACABEAAIABCABIABCADAABCACIAAGA'+
'CGAAGABAAAGABGAAGABCAAGAAAAAGABGAAAACGAAAACAAAIAB'+
'AABCAAIABCABIABEAAIABCABIABCADAABCACIAAGACGAAIABA'+
'AAIACIABAAAIAAAACGAAAACAABAAAGABCABAABEAAEABCABIA'+
'BCAACABCACEAAIACIABCADAAAGACGAAGAAEAAGAAAAAGAACAA'+
'GABCAAGABAAAGAAAAAGABCAAGABGAAGABGAAAACGAAAACAAAI'+
'ABAABCACGABCAACABCABIABCACEAAGACGAAAACGAAAACAAAIA'+
'BGABCAACABEAAGABCABGAAGACGAAAACGAAAACAAAHAEDAAFAC'+
'I');
就可以了。
10.至此delphi下的Intraweb已安装完成，但是如果用C++ Builder开始Intraweb应用，
还是评估版本，程序每次运行端口都会变化此界面上提示是评估版本，
本人的方法是将iw14.1.5.exe的程序目录(本人安装到C:\Program Files (x86)\IntraWeb XIV)，
将LibD10_1W32下的IWLicenseKey.pas添加c++ Builder 32位应用中，
那么64位应该就是将LibD10_1W64下的IWLicenseKey.pas添加到c++ Builder 64位应用中，不过本人没有进行测试。