| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2018/7/23 12:59:24 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 使用时注明出处。不然……哈哈 New(RadStudioVersion); with RadStudioVersion^ do begin Name := 'Rad Studio 10.2.3 Tokyo 3231'; Ver := '25.0.31059.3231'; BDSVersion := '19.0'; LicVerStr := '10.2 Tokyo'; LicHostPID := 8219; LicHostSKU := 52; LicDelphiPID := '2025'; LicCBuilderPID := '4022'; BdsPatchInfo.Crc := $CE8FA21E; BdsPatchInfo.Sha1 := '8daa98dbc558ec81cf582ec8c71233d9ab5fb76a'; BdsPatchInfo.PatchOffset := $1E95D; BdsPatchInfo.FinalizeArrayOffset := $111268; LicenseManagerPatchInfo.Crc := $1127F753; LicenseManagerPatchInfo.Sha1 := '485dcb165cdefe3f3e50090bf8cfafb8bca5b46f'; LicenseManagerPatchInfo.PatchOffset := $1E4939; LicenseManagerPatchInfo.FinalizeArrayOffset := $607828; mOasisRuntimePatchInfo.Sha1 := '30dc7ee5931b2f88904c60b5469144673bc544a8'; mOasisRuntimePatchInfo.PatchOffset := $166F85; SetupGUID := '{15CEC4B7-6F61-4D40-9491-255657E369A2}'; …… ---------------------------------------------- - |
|||||
| 作者： |
|
2018/7/23 13:01:29 | ||||
| 1楼： | 强顶。 要不要把您的 QQ 号写到 感谢名单中？ 可惜不是红色的。
(C)(P)Flying Wang |
|||||
| 作者： |
|
2018/7/23 13:28:56 | ||||
| 2楼： | 一般喜欢用53 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/7/23 13:29:00 | ||||
| 2楼： | RAD Studio 10.2.3 Tokyo Release 3 东京 UP3 网盘分享 + 安装破解指导 http://www.2pascal.com/forum.php?mod=viewthread&tid=3005&fromuid=4 (出处: 2Pascal-新时代的Pascal) 支持 3231 了。 多谢楼主。 这个数值 53 破解不了(CRC SHA 都换成 53 的了)。 53 可能需要另一个。 另外，53 52 到底安装出来，有那些功能或组件上的区别？ 求解答。 ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/7/23 13:32:30 | ||||
| 3楼： | 开心，多谢楼上各位！ ---------------------------------------------- -我的博客 |
|||||
| 作者： |
|
2018/7/23 13:49:52 | ||||
| 4楼： | 用53 crc sha当然不同 exe不一样 52是Ent/Arc 2合1 53是纯Arc 其他具体差别我也不清楚 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/7/23 14:15:02 | ||||
| 5楼： | 楼上的，我已经不同了啊 求 53 的 BdsPatchInfo.PatchOffset := ?; BdsPatchInfo.FinalizeArrayOffset := $111268; ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/7/23 16:01:14 | ||||
| 6楼： | 路过 ---------------------------------------------- 博客 - http://offeu.com 脚本模型 - http://webpascal.com 需要短信接口的请联系我，可发行业与营销内容。 |
|||||
| 作者： |
|
2018/7/23 20:12:46 | ||||
| 7楼： | 楼上都是大神 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/7/24 9:33:58 | ||||
| 8楼： | 根据 emailx45 大侠的 SHFolder.dll 得到 50 53 的 // BdsPatchInfo.PatchOffset:=$1E955; 和 52 的不通用。 问题在于，如何得到 这个的。看了大神的 gif 也得不到这个值。 社区版是 50，但是用 emailx45 大侠的工具，启动还是显示 架构师。 如果能显示 社区版 就好玩了。 ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/7/24 9:44:06 | ||||
| 9楼： | 只是显示问题 你要显什么字符都可以的 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/7/24 11:17:19 | ||||
| 10楼： | 能在10.2的版本上升级安装吗？以前装了好多控件，不想重装 谢谢 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/7/24 13:42:00 | ||||
| 11楼： | 如果是用iso安装的，就可以。 ---------------------------------------------- -我的博客 |
|||||
| 作者： |
|
2018/7/24 14:42:20 | ||||
| 12楼： | @ 10楼： 在注册表中找到Delphi安装路径下的Known Packages项目，导出备份到文件，打开备份文件删掉除了你自己安装的控件之外的包，再将你安装的控件全部备份，重新安装好delphi之后将备份的控件拷回到原来的目录，再将之前备份的注册表文件导入到系统中就可以了。这样就不用一个个去安装了。 ---------------------------------------------- -广袤璀璨的银河,永无止境的梦想(梦无止境游银河) 博客挂了…… |
|||||
| 作者： |
|
2018/7/24 17:35:31 | ||||
| 13楼： | 我已经成功的将 52 ，显示为 社区版了。 前提是，DELPHI 和 CB 只能安装一个。 否则 就不会显示 红色的 社区版，破解还是有效。 下图的工具，用的是 楼主的代码。修改了一下 slip 文件的内容而已。
(C)(P)Flying Wang |
|||||
| 作者： |
|
2018/7/25 5:21:56 | ||||
| 14楼： | @wang_80919 where is the the code source -- the Repository WAS TAKEDOWN! "Repository unavailable due to DMCA takedown. This repository is currently disabled due to a DMCA takedown notice. We have disabled public access to the repository. The notice has been publicly posted. If you are the repository owner, and you believe that your repository was disabled as a result of mistake or misidentification, you have the right to file a counter notice and have the repository reinstated. Our help articles provide more details on our DMCA takedown policy and how to file a counter notice. If you have any questions about the process or the risks in filing a counter notice, we suggest that you consult with a lawyer." ---------------------------------------------- The higher the degree, the greater the respect given to the humblest!RAD 11.3 |
|||||
| 作者： |
|
2018/7/25 8:44:04 | ||||
| 15楼： | 你可以找 github 算账。 上周 这个页面还可以访问呢。 github 好像也是 看 流行程度。不流行了就放开了。 ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/7/25 10:30:42 | ||||
| 16楼： | my test installing RAD Sdutio XE10.2.3 Arch 25.0.31059.3231 on a VirtualBox with Keygen to ...53-3231  ---------------------------------------------- The higher the degree, the greater the respect given to the humblest!RAD 11.3 |
|||||
| 作者： |
|
2018/7/25 10:52:05 | ||||
| 17楼： | 楼上，您是不是想说，我忘了在 感谢名单中 加您了？ ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/7/27 10:54:04 | ||||
| 18楼： | 安装后，也破解完成，之前的版本破解后GETIT可以使用，这次却不行，不知道有没有办法解决呢，谢谢！ ---------------------------------------------- - |
|||||
| 作者： |
|
2018/7/27 12:39:32 | ||||
| 19楼： | 楼上，你这叫 不知死活。 ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/8/2 10:13:03 | ||||
| 20楼： | I'm new user here, chinese and english isn't my native language, i'm decide to learn chinese (read and write), so forgive me if i write here in English. I love to see how @wang_80919 update the @elseif keygen, can you share the keygen here, especially for the updated source code? Thanks a lot. hex01 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/2 10:19:33 | ||||
| 21楼： | the code on github. and you can learn how to search file on internet. ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/8/2 10:37:38 | ||||
| 22楼： | @wang_80919, i already have or found the latest keygen's src by elseif but didn't found one like you already done. Can you help me with a some clue? Thanks for kindness hex01 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/2 10:41:07 | ||||
| 23楼： | I just change RadLicense.pas change CreateLicenseText like Result:='11'#10; Result := Result + 'e.pkg'#10; if Delphi and CB then begin Result := Result + 'RAD Studio '; end else if Delphi then begin Result := Result + 'Delphi '; end else if CB then begin Result := Result + 'C++ Builder '; end else begin Result := Result + 'RAD Studio '; end; Result := Result + RadStudioVersion^.LicVerStr; if ceMode then begin Result := Result + ' Community Edition'#10; end else begin Result := Result + ' Architect'#10; end; Result:=Result+'e.pt'#10'10'#10; Result:=Result+'e.sign'#10'0'#10; //some code TempCount := 4; if Delphi then Inc(TempCount); if CB then Inc(TempCount); Result:=Result + IntToStr(TempCount) + #10; //项目数 if Delphi then begin TempCount := 26; Result:=Result + IntToStr(TempCount) + #10; Result:=Result+'active'#10'T'#10; //some code ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/8/2 10:53:36 | ||||
| 24楼： | @wang_80919, thanks a lot for your clue, i will try to adopt it, please help when i found some issues. Have a nice day. hex01 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/2 11:02:31 | ||||
| 25楼： | @wang_80919, Just to make sure,can you explain what about sku=52 and sku=53, what the different both of it. What sku that represent for full Architect version? Also can you also create a working .slip for interbase server? hex01 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/2 12:06:19 | ||||
| 26楼： | @wang_80919, i have no idea where to put TempCount, and what is TempCount exactly means? can you post your whole RadLicense.pas or privately to mey email at hexzeroone@gmail.com. TIA hex01 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/2 12:50:45 | ||||
| 27楼： | I don't known 53 and 53 diff. and I can not patch interbase .I can not patch anything. and no. ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/8/3 2:34:39 | ||||
| 28楼： | does anybody can post the link to last SOURCE CODE from keygen updated ? on GitHub was deleted.... thanks for your time ---------------------------------------------- The higher the degree, the greater the respect given to the humblest!RAD 11.3 |
|||||
| 作者： |
|
2018/8/3 5:55:13 | ||||
| 29楼： | @emaix45, i still didn't found any updated keygen's source code that can works for others version except the Architect. I try to update the elseif original keygen with the clue from @wang_80919 but still can't make it works, i think it have to update 3 files: RadVersion.pas (this already done), RadLicense.pas (still trying), RadKeygen.pas (i think this have to updated too). May be @wang_80919 will help us more, just hope :D. hex01 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/3 8:53:37 | ||||
| 30楼： | RadKeygen.pas no need change. mybe,you need add some UpperCase(xxx) for Sha1 and md5 string. RadVersion.pas New(RadStudioVersion); with RadStudioVersion^ do begin Name:='Rad Studio 10.2.3.3231 Tokyo Not Hot Release 3 inline Enterprise/Architet/Ultimate'; Ver:= '25.0.31059.3231'; BDSVersion:='19.0'; LicVerStr:= '10.2 Tokyo Not Hot'; LicHostPID:= 8219; LicHostSKU:= 52; LicDelphiPID:='2025'; LicCBuilderPID:='4022'; LicDelphiVer:='25'; LicCBuilderVer:='19'; //50 bds.exe //Community or Professional Edition // BdsPatchInfo.Crc:=$988D5AEE; // BdsPatchInfo.Sha1:='D3BF59A1CBBEA3C563191302778F95C95A575461'; // BdsPatchInfo.PatchOffset:=$1E955; //by emailx45@yahoo.com.br //53 bds.exe //Architet // BdsPatchInfo.Crc:=$AD26B64B; // BdsPatchInfo.Sha1:='182ECCFBFE6D94F41E6587897D458FFF2F755210'; // BdsPatchInfo.PatchOffset:=$1E955; //by emailx45@yahoo.com.br //52 bds.exe //Enterprise/Architet/Ultimate BdsPatchInfo.Crc:=$CE8FA21E; BdsPatchInfo.Sha1:='8DAA98DBC558EC81CF582EC8C71233D9AB5FB76A'; BdsPatchInfo.PatchOffset:=$1E95D; //by tonzi@163.com QQ 2669242518 BdsPatchInfo.FinalizeArrayOffset:=$00111268; LicenseManagerPatchInfo.Crc:=$1127F753; LicenseManagerPatchInfo.Sha1:='485DCB165CDEFE3F3E50090BF8CFAFB8BCA5B46F'; LicenseManagerPatchInfo.PatchOffset:=$1E4939; LicenseManagerPatchInfo.FinalizeArrayOffset:=$607828; mOasisRuntimePatchInfo.Sha1:='30DC7EE5931B2F88904C60B5469144673BC544A8'; mOasisRuntimePatchInfo.PatchOffset:=$00166F85; SetupGUID:='{15CEC4B7-6F61-4D40-9491-255657E369A2}'; ISOUrl:='http://altd.embarcadero.com/download/radstudio/10.2/delphicbuilder10_2_3__93231.iso'; ISOMd5:='40D693B9989F7CCDF07C07EA676D1AB2'; end; VerList.AddObject(RadStudioVersion^.Name,TObject(RadStudioVersion)); RadLicense.pas Just change the title for show. it just a string . all code found from internet. ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/8/3 13:02:52 | ||||
| 31楼： | @wang_80919, where should i put these codes in RadLicense.pas //some code TempCount := 4; if Delphi then Inc(TempCount); if CB then Inc(TempCount); Result:=Result + IntToStr(TempCount) + #10; //项目数 if Delphi then begin TempCount := 26; Result:=Result + IntToStr(TempCount) + #10; Result:=Result+'active'#10'T'#10; //some code What is exactly TempCount represent? Thx a lot. hex01 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/3 13:49:08 | ||||
| 32楼： | you need learn algorithms and data structures RadLicense.pas no need change. it works fine. ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/8/6 10:31:18 | ||||
| 33楼： | 感谢各位 ---------------------------------------------- 我和我追逐的梦，擦肩而过 |
|||||
| 作者： |
|
2018/8/8 7:56:18 | ||||
| 34楼： | https://openload.co/f/3J2yVNCTwyk/RadStudioKeygenRADStudioXE10.2.3_CEv25.0.31059.3231.exe ---------------------------------------------- The higher the degree, the greater the respect given to the humblest!RAD 11.3 |
|||||
| 作者： |
|
2018/8/8 12:02:31 | ||||
| 35楼： | 下载不了了？ ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/8 15:12:21 | ||||
| 36楼： | @emailx45: can you share the keygen's src? TIA hex01 ---------------------------------------------- - |
|||||
| 作者： |
|
2018/8/8 16:02:46 | ||||
| 37楼： | 有 不看后悔 在，下载别的没必要。 ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2018/8/9 12:55:03 | ||||
| 38楼： | if you ANTIVIRUS show: ---> HEUR:Trojan-Banker.Win32.Generic ----> IS ONE "FALSE POSITIVE" (SEE THE CODE) Why? The funcion called: function GenerateLicenseFile(SerialNumber, RegistrationCode: string; RadStudioVersion: PRadStudioVersion; var FileName: string): Boolean; have some key-word that will be undertand by AV like one malicious code. like: sub-functions in "FGInt.pas" and functions to changed files in disk, the "SLIP" variable, etc... Then, this function IS the cause that your antivirus dont leave you run this keygen. SOLUTION: 1) in Delphi (XE10.2.3 for example), use "BUILD ALL" to build EXE resulted. 2) put the "EXE" in you "exception list" in your antivirus 3) run the keygen like ADMIN. Teste in RAD Studio XE10.2.3 build 2631 for compile this source code! +28 server files for your choice  https://multifilemirror.com/syzze2kud61m/RadStudioKeygenXE1023%283231%29FS2018-07-23NotCompiled.rar.html---------------------------------------------- The higher the degree, the greater the respect given to the humblest!RAD 11.3 |
|||||
| 作者： |
|
2018/8/16 15:44:53 | ||||
| 39楼： | 挂号 ---------------------------------------------- - |
|||||
| 作者： |
|
2019/5/22 16:02:18 | ||||
| 40楼： | 北京私家侦探 上海搬家公司 私家侦探 ---------------------------------------------- - |
|||||
| 信息 |
| 登陆以后才能回复 |
