DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡ ①
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡ ②
发布代码
发布控件
文档资料
经典工具
≡事务区≡ ③
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入： cuiqingbo
今日帖子： 25
在线用户： 9
导航： 论坛 -> 信息交换 斑竹:huadugaojian,sunyesy,huangjacky  
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/9 15:31:07
标题：
RAD Studio 10.2.1 Tokyo Not Hot 东京不热 RAD10.2 Release 1 架构师版 可安装，求破解。 浏览:10026
加入我的收藏
楼主： 求 unis 或者 elseif 和 freecat 和 x-force 大神做 slip 工具 和 破解工具吧。
就差您的帮助了

发布说明：
http://docwiki.embarcadero.com/RADStudio/Tokyo/en/10.2_Tokyo_-_Release_1
http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Main_Page
更新说明：
http://docwiki.embarcadero.com/RADStudio/Tokyo/en/What%27s_New
List of new features and customer reported issues fixed in RAD Studio 10.2 Tokyo Release 1
http://edn.embarcadero.com/article/44763
List of new features and customer reported issues fixed in RAD Studio 10.2 Tokyo RTM
http://edn.embarcadero.com/article/44747
RAD Studio 10.2 更新说明
http://blog.qdac.cc/?p=4475
**********


版本：25.0.27659.1188
大小：6,495,090,688 字节
MD5: 3F7028BE8D3831B098102E9BF5732E3B
SHA1: 0B72D2A63B3066DA406C69E0788A79C20DC4BDC9
CRC32: B58ECE82

官方下载地址(任选其一):
http://cc.embarcadero.com/Item/30786
http://altd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2_1.iso
ftp://ftpd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2_1.iso
----------------------------------------------
(C)(P)Flying Wang
作者：
男 zhuzh_yuy (华) ★☆☆☆☆ -
普通会员
2017/8/9 15:35:42
1楼： 顶
----------------------------------------------
-
作者：
女 zqznew (zqznew) ★☆☆☆☆ -
普通会员
2017/8/9 15:48:22
2楼： 顶!!
----------------------------------------------
-
作者：
男 wojiaohaoyaping (我叫郝亚平) ▲▲▲▲△ -
普通会员
2017/8/9 16:32:05
3楼： 顶顶顶！
----------------------------------------------
-
作者：
男 cji (农夫) ★☆☆☆☆ -
盒子活跃会员
2017/8/9 16:37:04
4楼： 顶!!!
----------------------------------------------
-
作者：
男 bdl1 (bdl1) ▲▲▲▲▲ -
普通会员
2017/8/9 16:54:54
5楼： 顶顶顶！
----------------------------------------------
-我的博客
作者：
男 rlz (2ys) ★☆☆☆☆ -
盒子活跃会员
2017/8/9 17:44:01
6楼： 顶！！！
----------------------------------------------
-
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/9 18:03:03
7楼： 新版本 在 小米平板 2 显示还是不全。
----------------------------------------------
(C)(P)Flying Wang
作者：
男 zyp1984 (小李他妈的飞刀) ★☆☆☆☆ -
普通会员
2017/8/9 18:09:11
8楼： 狂狂狂 顶 顶 顶。。。！！！
----------------------------------------------
山外青山楼外楼,能人背后有能人弄..
作者：
男 epzybook (epzybook) ★☆☆☆☆ -
普通会员
2017/8/9 18:15:02
9楼： 我出红包顶。。。。。
----------------------------------------------
-
作者：
男 wokaoxe (wokaoxe) ▲▲▲▲△ -
普通会员
2017/8/9 19:30:18
10楼： 继续折腾
----------------------------------------------
-
作者：
男 delphiilove (乌羽玉) ★☆☆☆☆ -
普通会员
2017/8/9 22:14:20
11楼： 支持顶，头顶上顶个锅。
----------------------------------------------
-
作者：
男 reborntercel (再生的雄鹰) ▲▲▲▲▲ -
普通会员
2017/8/10 10:24:37
12楼： C++ builder FOR LINUX 还是没看到支持
----------------------------------------------
-
作者：
男 wg961423 (麦子仲肥) ★☆☆☆☆ -
盒子活跃会员
2017/8/10 10:49:11
13楼： @reborntercel (再生的雄鹰)
要10.2.2才支持的
----------------------------------------------
-
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/10 14:05:35
14楼： 链接：
http://pan.baidu.com/s/1i4FfecP
 密码：aikb

网盘下载
----------------------------------------------
(C)(P)Flying Wang
作者：
男 zhuzh_yuy (华) ★☆☆☆☆ -
普通会员
2017/8/10 21:24:27
15楼： 快出来吧
----------------------------------------------
-
作者：
男 unis (unis) ▲▲▲▲△ -
普通会员
2017/8/11 1:53:05
17楼： memleak
此帖子包含附件:
PNG 图像
大小:70.6K
----------------------------------------------
-
作者：
男 unis (unis) ▲▲▲▲△ -
普通会员
2017/8/11 3:10:29
18楼： Here is another proof:
https://stackoverflow.com/questions/45588741/delphi-recompiling-application-with-10-2-1-causes-memory-leaks
----------------------------------------------
-
作者：
男 roadrunner (roadrunner) ★☆☆☆☆ -
盒子活跃会员
2017/8/11 7:05:21
19楼： 你妹这太囧了, 这都干的什么活呀
----------------------------------------------
-
作者：
男 hq200306 (200306) ★☆☆☆☆ -
普通会员
2017/8/11 7:36:48
20楼： @unis (unis) 发个cr出来，大家玩一下
----------------------------------------------
-
作者：
男 djhfwk (djhfwk) ▲▲▲▲▲ -
普通会员
2017/8/11 8:23:51
21楼： 退FMX保平安
----------------------------------------------
-
作者：
男 testtset (testtset) ▲▲▲▲▲ -
普通会员
2017/8/11 8:25:24
22楼： 看到一个解决方法
此帖子包含附件:
PNG 图像
大小:72.3K
----------------------------------------------
在乌鸦掌控的世界里，洁白的羽毛是有罪的。
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/11 9:09:47
23楼： 上面的代码解决不了泄露
----------------------------------------------
(C)(P)Flying Wang
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/11 9:48:38
24楼： https://quality.embarcadero.com/browse/RSP-18798
不知道，是不是和这个一样。
----------------------------------------------
(C)(P)Flying Wang
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/11 10:31:03
25楼： 虽然从网上找到了一个 破解。
但是 破解不完美。
LicenseManager 什么也不显示。
----------------------------------------------
(C)(P)Flying Wang
作者：
男 hq200306 (200306) ★☆☆☆☆ -
普通会员
2017/8/11 10:37:52
26楼： ide能进去不？
----------------------------------------------
-
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/11 10:42:37
27楼： RAD Studio 10.2.1 Tokyo Release 1 东京 UP1 网盘分享 + 安装破解指导
http://www.2pascal.com/forum.php?mod=viewthread&tid=2971&fromuid=4
(出处: 2Pascal-新时代的Pascal)
----------------------------------------------
(C)(P)Flying Wang
作者：
男 blueflag (昆了) ★☆☆☆☆ -
盒子活跃会员
2017/8/11 11:55:22
28楼： 等待完美破解，等待大神出手~
----------------------------------------------
-
作者：
男 testtset (testtset) ▲▲▲▲▲ -
普通会员
2017/8/11 11:55:41
28楼： https://quality.embarcadero.com/browse/RSP-18774
----------------------------------------------
在乌鸦掌控的世界里，洁白的羽毛是有罪的。
作者：
男 lsu (lsu) ★☆☆☆☆ -
普通会员
2017/8/11 12:03:59
29楼：
   https://mega.nz/#!tF93UDaA!o3uZWfrtpye21vji-5qtpnl-25Do5FGVu-TuRvz6p4w
----------------------------------------------
-
作者：
男 epzybook (epzybook) ★☆☆☆☆ -
普通会员
2017/8/11 12:59:26
30楼： 29楼，翻墙都访问不了
----------------------------------------------
-
作者：
男 jczxdai (草籽) ▲▲▲▲△ -
普通会员
2017/8/11 13:10:39
31楼： 刚出炉的破解
此帖子包含附件:jczxdai_2017811131136.rar 大小:800.0K
----------------------------------------------
草籽天涯
作者：
男 hujiacheng ( 旺财) ★☆☆☆☆ -
普通会员
2017/8/11 13:19:32
32楼： 不翻墙 29楼我都下载好了。
hosts
----------------------------------------------
免费的FTPhttps://download-installer.cdn.mozilla.net/pub/firefox/releases/43.0/win64/zh-CN/https://cc.embarcadero.com/Author/575019>http://delphi-z.ruhttps://download-installer.cdn.mozilla.net/pub/firefox/releases/43.0/win64/zh-CN/https://cc.embarcadero.com/Author/575019>http://delphi.icm.edu.pl/ftp/https://download-installer.cdn.mozilla.net/pub/firefox/releases/43.0/win64/zh-CN/https://cc.embarcadero.com/Author/575019>http://delphi-z.ruhttps://download-installer.cdn.mozilla.net/pub/firefox/releases/43.0/win64/zh-CN/https://cc.embarcadero.com/Author/575019
作者：
男 pspice (pspice) ★☆☆☆☆ -
普通会员
2017/8/11 13:19:53
32楼： 29楼发的文件搬移到这，好不好用不知道呢。
此帖子包含附件:pspice_2017811131952.rar 大小:800.0K
----------------------------------------------
-
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/11 13:24:59
32楼： 多谢楼上。
----------------------------------------------
(C)(P)Flying Wang
作者：
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/8/11 17:31:38
33楼： 你们发的这个破解
也是 LicenseManager 什么也不显示。
----------------------------------------------
(C)(P)Flying Wang
作者：
男 hq200306 (200306) ★☆☆☆☆ -
普通会员
2017/8/11 18:58:22
34楼： 我的win7 64bi4,8G 内存，装10.2,10.2.1在录入strcopy报错，10.1以下没报错，找不到原因，刚提交的https://quality.embarcadero.com/browse/RSP-18801
此帖子包含附件:
PNG 图像
大小:105.9K
----------------------------------------------
-
作者：
男 testtset (testtset) ▲▲▲▲▲ -
普通会员
2017/8/11 19:06:38
35楼： win10 64bi4,8G 内存，装10.2,10.2.1在录入strcopy正常，没任何错误。
----------------------------------------------
在乌鸦掌控的世界里，洁白的羽毛是有罪的。
作者：
男 lsu (lsu) ★☆☆☆☆ -
普通会员
2017/8/11 20:09:53
36楼：
   http://www69.zippyshare.com/v/BHJOLw16/file.html


   http://uploadrocket.net/7c7uu3iriexh/RadStudioKeygenSourceCode10.2.1.rar.html ;
 
   
   https://tusfiles.net/dc51tcfmbiqv
----------------------------------------------
-
作者：
男 kylix2008 (kylix2008) ★☆☆☆☆ -
普通会员
2017/8/12 23:41:35
37楼： http://www.delphi6.com/thread-611.htm

Rad Studio Keygen 10.2.1，这个破解呢？
----------------------------------------------
-
作者：
男 wojiaohaoyaping (我叫郝亚平) ▲▲▲▲△ -
普通会员
2017/8/13 6:18:40
38楼： lsuper 的lite已出
----------------------------------------------
-
作者：
男 lsu (lsu) ★☆☆☆☆ -
普通会员
2017/8/13 8:13:43
39楼：

  unit RadVersion;

interface
uses Windows,Classes,SysUtils;
type
  TPatchInfo=record
    Crc:DWORD;
    Sha1:string;
    PatchOffset:DWORD;
    FinalizeArrayOffset:DWORD;
  end;

  TRadStudioVersion=record
    Name:string;          //  Rad Studio 10.1 Berlin Update1
    Ver:string;          //  24.0.24468.8770
    BDSVersion:string;          //  18.0
    LicVerStr:string;          //  10.1 Berlin
    LicHostPID:Integer;          //  8218
    LicHostSKU:Integer;          //  53
    LicDelphiPID:string;
    LicCBuilderPID:string;
    BdsPatchInfo:TPatchInfo;
    LicenseManagerPatchInfo:TPatchInfo;
    mOasisRuntimePatchInfo:TPatchInfo;
    SetupGUID:string;
    ISOUrl:string;
    ISOMd5:string;
  end;
  PRadStudioVersion=^TRadStudioVersion;
var
  RadStudioVersionList:TStringList;
implementation

procedure InitRadStudioVersion(VerList:TStringList);
var
  RadStudioVersion:PRadStudioVersion;
begin
  New(RadStudioVersion);
  with RadStudioVersion^ do
  begin
    Name:='Rad Studio 10.2.1 Tokyo';
    Ver:= '25.0.27659.1188';
    BDSVersion:='19.0';
    LicVerStr:= '10.2 Tokyo';
    LicHostPID:= 8219;
    LicHostSKU:= 52;
    LicDelphiPID:='2025';
    LicCBuilderPID:='4022';
    BdsPatchInfo.Crc:=$bc350a66;
    BdsPatchInfo.Sha1:='67a1602a64297743f12758ce74b437f596054e30';
    BdsPatchInfo.PatchOffset:=$1E7D9;
    BdsPatchInfo.FinalizeArrayOffset:=$10BFFC;
    LicenseManagerPatchInfo.Crc:=$0c209f01;
    LicenseManagerPatchInfo.Sha1:='65b07e3d273a3c1ec0f722266ad73375d02e69a0';
    LicenseManagerPatchInfo.PatchOffset:=$001E4435;
    LicenseManagerPatchInfo.FinalizeArrayOffset:=$6077D4;
    mOasisRuntimePatchInfo.Sha1:='39ecf2e1a55c62ba56efd861d7bde7dd83f8551f';
    mOasisRuntimePatchInfo.PatchOffset:=$00165FD5;
    SetupGUID:='{157FDBBC-21E6-4B45-A995-CA25BB2864BF}';
    ISOUrl:='http://altd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2_1.iso';
    ISOMd5:='3f7028be8d3831b098102e9bf5732e3b';
  end;
  VerList.AddObject(RadStudioVersion^.Name,TObject(RadStudioVersion));


  New(RadStudioVersion);
  with RadStudioVersion^ do
  begin
    Name:='Rad Studio 10.2 Tokyo';
    Ver:= '25.0.26309.314';
    BDSVersion:='19.0';
    LicVerStr:= '10.2 Tokyo';
    LicHostPID:= 8219;
    LicHostSKU:= 52;
    LicDelphiPID:='2025';
    LicCBuilderPID:='4022';
    BdsPatchInfo.Crc:=$23d6bbc6;
    BdsPatchInfo.Sha1:='6b61fe60e4f806913fdf103e294200d1341089ba';
    BdsPatchInfo.PatchOffset:=$1E7D5;
    BdsPatchInfo.FinalizeArrayOffset:=$26886C;
    LicenseManagerPatchInfo.Crc:=$34d8a9ba;
    LicenseManagerPatchInfo.Sha1:='a2feb2da6e8b7cc7660ed2b54eec1cad09daeb6c';
    LicenseManagerPatchInfo.PatchOffset:=$001E4209;
    LicenseManagerPatchInfo.FinalizeArrayOffset:=$660B6C;
    mOasisRuntimePatchInfo.Sha1:='39ecf2e1a55c62ba56efd861d7bde7dd83f8551f';
    mOasisRuntimePatchInfo.PatchOffset:=$00165FD5;
    SetupGUID:='{0556178E-2062-46E3-8FE9-E620C40DB02B}';
    ISOUrl:='http://altd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2.iso';
    ISOMd5:='8855db8d40993c18672f226bf395bfcd';
  end;
  VerList.AddObject(RadStudioVersion^.Name,TObject(RadStudioVersion));


  New(RadStudioVersion);
  with RadStudioVersion^ do
  begin
    Name:='Rad Studio 10.1 Berlin Update2';
    Ver:= '24.0.25048.9432';
    BDSVersion:='18.0';
    LicVerStr:= '10.1 Berlin';
    LicHostPID:= 8218;
    LicHostSKU:= 53;
    LicDelphiPID:='2024';
    LicCBuilderPID:='4021';
    BdsPatchInfo.Crc:=$a1315aab;
    BdsPatchInfo.Sha1:='9627eeef0574f46f4ec9348b806d30c9c37ad3ed';
    BdsPatchInfo.PatchOffset:=$5143D;
    BdsPatchInfo.FinalizeArrayOffset:=$264604;
    LicenseManagerPatchInfo.Crc:=$9189a95c;
    LicenseManagerPatchInfo.Sha1:='493ebece2682544c2d6c2bbbdba5b6da70ca73e1';
    LicenseManagerPatchInfo.PatchOffset:=$1E82E5;
    LicenseManagerPatchInfo.FinalizeArrayOffset:=$671A18;
    mOasisRuntimePatchInfo.Sha1:='39ecf2e1a55c62ba56efd861d7bde7dd83f8551f';
    mOasisRuntimePatchInfo.PatchOffset:=$00165FD5;
    SetupGUID:='{2008E4BD-A356-4759-8A78-18636D2E75C9}';
    ISOUrl:='http://altd.embarcadero.com/download/radstudio/10.1/radstudio10_1_upd2_esd.iso';
    ISOMd5:='920f0acf67122bb04ed55edd7a1c7579';
  end;
  VerList.AddObject(RadStudioVersion^.Name,TObject(RadStudioVersion));
  
  New(RadStudioVersion);
  with RadStudioVersion^ do
  begin
    Name:='Rad Studio 10.1 Berlin Update1';
    Ver:= '24.0.24468.8770';
    BDSVersion:='18.0';
    LicVerStr:= '10.1 Berlin';
    LicHostPID:= 8218;
    LicHostSKU:= 53;
    LicDelphiPID:='2024';
    LicCBuilderPID:='4021';
    BdsPatchInfo.Crc:=$9626A6DC;
    BdsPatchInfo.Sha1:='82d3cd849786f2ece428ab7518ec9ecf47d475e6';
    BdsPatchInfo.PatchOffset:=$51449;
    BdsPatchInfo.FinalizeArrayOffset:=$264584;
    LicenseManagerPatchInfo.Crc:=$3B314A18;
    LicenseManagerPatchInfo.Sha1:='79b342e41f97728e16c6302e08b44f89b0655a9e';
    LicenseManagerPatchInfo.PatchOffset:=$1E8FB5;
    LicenseManagerPatchInfo.FinalizeArrayOffset:=$6729E0;
    mOasisRuntimePatchInfo.Sha1:='7aa466dd1d2c685edd69ee41d1c8ebc1d2b56bb4';
    mOasisRuntimePatchInfo.PatchOffset:=$00162CBD;
    SetupGUID:='{37C118B3-EF7F-4110-BFE5-E866FB456C8E}';
    ISOUrl:='http://altd.embarcadero.com/download/radstudio/10.1/delphicbuilder10_1_upd1.iso';
    ISOMd5:='a85a0fba4f8bab121312184cda85c198';
  end;
  VerList.AddObject(RadStudioVersion^.Name,TObject(RadStudioVersion));

  New(RadStudioVersion);
  with RadStudioVersion^ do
  begin
    Name:='Rad Studio 10.1 Berlin';
    Ver:= '24.0.22858.6822';
    BDSVersion:='18.0';
    LicVerStr:= '10.1 Berlin';
    LicHostPID:= 8218;
    LicHostSKU:= 53;
    LicDelphiPID:='2024';
    LicCBuilderPID:='4021';
    BdsPatchInfo.Crc:=$1BA3E394;
    BdsPatchInfo.Sha1:='a492883335230bced0651338584fbe8c49bd94a8';
    BdsPatchInfo.PatchOffset:=$51449;
    BdsPatchInfo.FinalizeArrayOffset:=$264584;
    LicenseManagerPatchInfo.Crc:=$D2BAA257;
    LicenseManagerPatchInfo.Sha1:='d0d024b97d02608a505fb0e667dd564b53c91b13';
    LicenseManagerPatchInfo.PatchOffset:=$1E9035;
    LicenseManagerPatchInfo.FinalizeArrayOffset:=$6719B8;
    mOasisRuntimePatchInfo.Sha1:='7aa466dd1d2c685edd69ee41d1c8ebc1d2b56bb4';
    mOasisRuntimePatchInfo.PatchOffset:=$00162CBD;
    SetupGUID:='{655CBACE-A23C-42B8-B924-A88E80F352B5}';
    ISOUrl:='http://altd.embarcadero.com/download/radstudio/10.1/delphicbuilder10_1.iso';
    ISOMd5:='466d2db93e5b3b631eabba69d052b28f';
  end;
  VerList.AddObject(RadStudioVersion^.Name,TObject(RadStudioVersion));

  New(RadStudioVersion);
  with RadStudioVersion^ do
  begin
    Name:='Rad Studio 10 Seattle Update1';
    Ver:= '23.0.21418.4207';
    BDSVersion:='17.0';
    LicVerStr:= '10 Seattle';
    LicHostPID:= 8217;
    LicHostSKU:= 53;
    LicDelphiPID:='2023';
    LicCBuilderPID:='4020';
    BdsPatchInfo.Crc:=$b5bd665f;
    BdsPatchInfo.Sha1:='e8cc301efc449f90750d921ab73be31d824c08c6';
    BdsPatchInfo.PatchOffset:=$4fe51;
    BdsPatchInfo.FinalizeArrayOffset:=$225f84;
    LicenseManagerPatchInfo.Crc:=$8395454d;
    LicenseManagerPatchInfo.Sha1:='0ca4640d6c1c2f470ff3182809b881a97e76e534';
    LicenseManagerPatchInfo.PatchOffset:=$1ca696;
    LicenseManagerPatchInfo.FinalizeArrayOffset:=$6306ac;
    mOasisRuntimePatchInfo.Sha1:='7aa466dd1d2c685edd69ee41d1c8ebc1d2b56bb4';
    mOasisRuntimePatchInfo.PatchOffset:=$00162CBD;
    SetupGUID:='{5D50B637-4756-435A-816E-68ABFE86FC69}';
    ISOUrl:='http://altd.embarcadero.com/download/radstudio/10/delphicbuilder10___upd1.iso';
    ISOMd5:='34bf51b0f017541b8521e7efd2b6fbee';
  end;
  VerList.AddObject(RadStudioVersion^.Name,TObject(RadStudioVersion));

  New(RadStudioVersion);
  with RadStudioVersion^ do
  begin
    Name:='Rad Studio 10 Seattle';
    Ver:= '23.0.20618.2753';
    BDSVersion:='17.0';
    LicVerStr:= '10 Seattle';
    LicHostPID:= 8217;
    LicHostSKU:= 53;
    LicDelphiPID:='2023';
    LicCBuilderPID:='4020';
    BdsPatchInfo.Crc:=$59176e2b;
    BdsPatchInfo.Sha1:='0f4255ee60dc860bdcf75c3358d03674757474a5';
    BdsPatchInfo.PatchOffset:=$500ea;
    BdsPatchInfo.FinalizeArrayOffset:=$225ec8;
    LicenseManagerPatchInfo.Crc:=$d06c02b0;
    LicenseManagerPatchInfo.Sha1:='4ff37906e7283448aecab34c73c8dbe3d45f55a6';
    LicenseManagerPatchInfo.PatchOffset:=$1ca98a;
    LicenseManagerPatchInfo.FinalizeArrayOffset:=$630634;
    mOasisRuntimePatchInfo.Sha1:='7aa466dd1d2c685edd69ee41d1c8ebc1d2b56bb4';
    mOasisRuntimePatchInfo.PatchOffset:=$00162CBD;
    SetupGUID:='{09FECC13-2950-4AE6-BB23-05C206979F18}';
    ISOUrl:='http://altd.embarcadero.com/download/radstudio/10/delphicbuilder10.iso';
    ISOMd5:='9d4bac568aced7f1f82d4a44124fb37c';
  end;
  VerList.AddObject(RadStudioVersion^.Name,TObject(RadStudioVersion));

end;  

procedure FinallyRadStudioVersion(VerList:TStringList);
var
  RadStudioVersion:PRadStudioVersion;
begin
  while VerList.Count>0 do
  begin
    RadStudioVersion:=PRadStudioVersion(VerList.Objects[0]);
    if RadStudioVersion<>nil then Dispose(RadStudioVersion);
    VerList.Delete(0);
  end;
end;  

initialization
  RadStudioVersionList:= TStringList.Create;
  InitRadStudioVersion(RadStudioVersionList);
finalization
  FinallyRadStudioVersion(RadStudioVersionList);
  FreeAndNil(RadStudioVersionList);

end.
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行148.4375毫秒 RSS