导航:
论坛 -> DELPHI技术
斑竹:liumazi,sephil
作者:
tonzi (tonzi)
★☆☆☆☆
-
普通会员
2021/3/1 16:56:32
标题:
RAD Studio 10.4.2 keygen source
浏览:11468
加入我的收藏
楼主:
注册机被杀软报毒原因无非使用了不当代码或者你的EXE让杀软盯上了。如果没有使用不当代码,建议你编译程序时,将所有文件换名或混淆一下,这时再试试,杀软见她就友好了! 关于RAD Studio的keygen已经开源了,后辈就应该接棒下去,福音众生。我是很鄙视拿了人家东西还当自己原创的,加个壳然后现出来,很丢人的。 Delphi整到现在,依然还是格局不大,哆哆嗦嗦惯了…… 说多了,干点正事,贴上核心代码。 New(RadStudioVersion); with RadStudioVersion^ do begin Name := 'Rad Studio 10.4.2 Enterprise'; Ver := '27.0.40680.4203'; Edition := 'Enterprise'; DelphiVer := '27'; CBuilderVer := '24'; BDSVersion := '21.0'; LicVerStr := '10.4'; LicHostPID := 8221; LicHostSKU := 52; // Enterprise/Architect/Ultimate LicDelphiPID := '2027'; LicCBuilderPID := '4024'; BdsPatchInfo.Crc := $E8715169; BdsPatchInfo.Sha1 := 'ad6dce5d98b15d67a3c049d64f6478cdd00c3604'; BdsPatchInfo.PatchOffset := $1FDB2; BdsPatchInfo.FinalizeArrayOffset := $12AC78; LicenseManagerPatchInfo.Crc := $BE265158; LicenseManagerPatchInfo.Sha1 := '4654f3ca077dda98050f8102f96bdd0fd7bd04b7'; LicenseManagerPatchInfo.PatchOffset := $157B56; LicenseManagerPatchInfo.FinalizeArrayOffset := $5A77E0; mOasisRuntimePatchInfo.Sha1 := 'c18578a769b35ee0d691a7a704c63c9733e0e938'; mOasisRuntimePatchInfo.PatchOffset := $197E5C; SetupGUID := '{5AB6556B-385E-40B5-A312-8F76E49F0899}'; ISOUrl := 'http://altd.embarcadero.com/download/radstudio/10.4/RADStudio-1042-4203.iso'; ISOMd5 := '3bad57c9be6519841efa46727eb65374'; end; VerList.AddObject(RadStudioVersion^.Name, TObject(RadStudioVersion)); 另外,看客引用时注明来源。 关于安装ISO,主要是需要给内存mOasisRuntime.dll,打上补丁,然后Back,就可以安装下去了。 至于怎么打补丁,可以Google一下。
----------------------------------------------
-
作者:
2021/3/1 17:05:38
1楼:
多谢。 如果 gds 服务 也有破解源码 就更好了。
----------------------------------------------
(C)(P)Flying Wang
作者:
leehq (leehq)
★☆☆☆☆
-
盒子活跃会员
2021/3/1 20:10:29
2楼:
不是很懂啊。
----------------------------------------------
-
作者:
tonzi (tonzi)
★☆☆☆☆
-
普通会员
2021/3/3 18:12:49
3楼:
修改版本 New(RadStudioVersion); with RadStudioVersion^ do begin Name := 'Rad Studio 10.4.2 Enterprise'; Ver := '27.0.40680.4203'; Edition := 'Enterprise'; DelphiVer := '27'; CBuilderVer := '24'; BDSVersion := '21.0'; LicVerStr := '10.4'; LicHostPID := 8221; LicHostSKU := 52; // Enterprise/Architect/Ultimate LicDelphiPID := '2027'; LicCBuilderPID := '4024'; BdsPatchInfo.Crc := $E8715169; BdsPatchInfo.Sha1 := 'ad6dce5d98b15d67a3c049d64f6478cdd00c3604'; BdsPatchInfo.PatchOffset := $1FF3E; BdsPatchInfo.FinalizeArrayOffset := $12AC78; LicenseManagerPatchInfo.Crc := $BE265158; LicenseManagerPatchInfo.Sha1 := '4654f3ca077dda98050f8102f96bdd0fd7bd04b7'; LicenseManagerPatchInfo.PatchOffset := $157B46; LicenseManagerPatchInfo.FinalizeArrayOffset := $5A77E0; mOasisRuntimePatchInfo.Sha1 := 'c18578a769b35ee0d691a7a704c63c9733e0e938'; mOasisRuntimePatchInfo.PatchOffset := $197E5C; SetupGUID := '{5AB6556B-385E-40B5-A312-8F76E49F0899}'; ISOUrl := 'http://altd.embarcadero.com/download/radstudio/10.4/RADStudio-1042-4203.iso'; ISOMd5 := '3bad57c9be6519841efa46727eb65374'; end; VerList.AddObject(RadStudioVersion^.Name, TObject(RadStudioVersion));
----------------------------------------------
-
作者:
2021/3/4 8:16:13
4楼:
等社区版注册机~
----------------------------------------------
-
作者:
2021/3/4 11:19:55
5楼:
我估摸着不会出毕竟源码是有的 自己不改 没人需求那玩意 真需要直接官方就行了
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/4 11:29:09
6楼:
@qcb_8031 (天龙) 肯定有人能做出来,但是没人共享出来啊。社区版的注册机。
----------------------------------------------
-
作者:
2021/3/4 12:30:31
7楼:
社区版~没动手能力别点我
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/6 15:32:55
8楼:
@keymark 只有核心代码,没有完整源码怎么修改啊。
----------------------------------------------
-
作者:
2021/3/6 16:16:47
9楼:
@ rtcode (rtcode) reg 社区版 dec slp to txt copy txt 授权.pas set up Name := ''; Ver := ''; Edition := ''; DelphiVer := ''; CBuilderVer := ''; BDSVersion := ''; LicVerStr := ''; LicHostPID := ; LicHostSKU := ; // Enterprise/Architect/Ultimate LicDelphiPID := ''; LicCBuilderPID := ''; BdsPatchInfo.Crc := $; BdsPatchInfo.Sha1 := ''; BdsPatchInfo.PatchOffset := $; BdsPatchInfo.FinalizeArrayOffset := $; LicenseManagerPatchInfo.Crc := $; LicenseManagerPatchInfo.Sha1 := ''; LicenseManagerPatchInfo.PatchOffset := $; LicenseManagerPatchInfo.FinalizeArrayOffset := $;
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/6 21:11:13
10楼:
请问这源码怎么用? 我只会CB的编码,DELPHI的不会,看不懂。
----------------------------------------------
-
作者:
2021/3/6 21:55:03
11楼:
http://bbs.2ccc.com/topic.asp?topicid=560887 BdsPatchInfo.Crc := $d0526086; BdsPatchInfo.Sha1 := '620fcefba0bf6eaa709b96bbeabb00a125e8519d'; https://tool.lu/timestamp/ 按照 我的思路 改出来的 不会delphi 学吧 不难
此帖子包含附件: 大小: 19.3K
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/7 3:56:24
12楼:
If you plan to deploy fake license for Delphi 10.x.x Community Edition, so there is a possibility for Unlimited License Term.
此帖子包含附件: 大小: 89.9K
----------------------------------------------
-
作者:
2021/3/8 11:18:37
13楼:
@kostyantynko 大侠,能否分享下社区版的注册机呀
----------------------------------------------
-
作者:
2021/3/8 12:08:34
14楼:
你们这帮人,要啥 社区版? 难道你安装了 社区版 就没有 律师函了? 想的真美!
----------------------------------------------
(C)(P)Flying Wang
作者:
2021/3/8 13:38:10
15楼:
我就是验证下我的说法.......... 现在我的油箱试用(社区)版都注册不到.....
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/8 15:19:25
16楼:
请问只需要修改RadStudioVersion一个文件就可以吗?想学习一下
----------------------------------------------
-
作者:
2021/3/8 15:21:50
17楼:
只需要修改RadStudioVersion一个文件就可以吗?学习一下
----------------------------------------------
-
作者:
2021/3/8 15:54:19
18楼:
@happy_8899 (Daniel) 只修改RadStudioVersion文件没有用的,还要修改其他文件。
----------------------------------------------
-
作者:
haiq (海强)
★☆☆☆☆
-
普通会员
2021/3/8 16:04:02
19楼:
试了一下,好像可以! RAD Studio 10.4.2 Architect Edition - KeyGen Source Code.rar
----------------------------------------------
- 我不用,是因为不知有何用。
作者:
2021/3/8 16:33:39
20楼:
@haiq 试了一下,好像可以 -> I tried it, and it seems to work! Q: Does it work from a cold start?
----------------------------------------------
-
作者:
2021/3/8 23:15:05
21楼:
@haiq,用10.3.3编译完成后,安装不成啊,Generate以后,选Next还是进入 "Input License" page,不能安装!
----------------------------------------------
-
作者:
haiq (海强)
★☆☆☆☆
-
普通会员
2021/3/9 7:46:07
22楼:
我是在 10.4.2 中测试的,有时间从头(安装)试试!
----------------------------------------------
- 我不用,是因为不知有何用。
作者:
2021/3/9 13:10:29
23楼:
@haiq This KeyGen is far not ready to patch rad studio setup process. Still ) a lot )) a lot ))) a lot ))) of work... /////KEYGEN IS UNDER HEAVY CONSTRUCTION//// So don't give up :-)
----------------------------------------------
-
作者:
2021/3/14 14:06:15
24楼:
Embarcadero易博龙太小气了,开发工具社区版应该学学微软。
----------------------------------------------
-
作者:
2021/3/18 7:00:10
25楼:
说了这么多,就是没人放个社区版注册机出来!就算照样被发律师函,但社区版用着至少有个自欺欺人的安慰感,说明心中还有忌讳,还有底线。呵呵,瞎说瞎说!别当真!
----------------------------------------------
-
作者:
2021/3/18 11:00:17
26楼:
我9楼的文字很难理解吗,居然还有人等社区keygen exe? 源码也有方法也有 就是不愿意动下小手?
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/18 11:18:42
27楼:
你倒是吧 BdsPatchInfo.PatchOffset := $; BdsPatchInfo.FinalizeArrayOffset := $; 这两个 填上 啊。 不过,我不认为,你用 盗版的 社区版 就 比我们 用 盗版的架构师版 有 底线。 有个PI的底线。
----------------------------------------------
(C)(P)Flying Wang
作者:
2021/3/18 13:05:41
28楼:
Good thing that's the any version of the Delphi Community Editions can be easily hacked,so we can use it for life... Just waiting for official release, now it's all about time :-)
此帖子包含附件: 大小: 56.0K
----------------------------------------------
-
作者:
2021/3/18 13:12:04
29楼:
楼上说得对,等官方提供 社区版的 序列号 获取 机制。
----------------------------------------------
(C)(P)Flying Wang
作者:
2021/3/18 21:32:37
30楼:
@wang_80919 (Flying Wang) goto: 11楼: goto:560887 19楼: 我10.3.3 社区版装出来就是 crc 不一样
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/19 8:29:46
31楼:
那些偏移值社区版和企业版都一样?
----------------------------------------------
-
作者:
2021/3/19 8:30:52
32楼:
装逼的大神们,,放一个社区版的注册机出来?让我们大伙膜拜一下
----------------------------------------------
-
作者:
2021/3/19 23:12:00
34楼:
@keymark You don't have to patch moasisruntime.dll file, if license slip file has correct e.sign2 and e.sign3 signatures. Tip: fix e.sign2 signature... ;-)
----------------------------------------------
-
作者:
2021/3/20 9:53:28
35楼:
tks@kostyantynko (KostyantynX) http://web.chacuo.net/netrsakeypair keygen https://bbs.csdn.net/topics/392153794 http://blog.fish2bird.com/?p=774 https://blog.csdn.net/superwfei/article/details/83782678baidu 位数 私钥长度(BASE64) 公钥长度(BASE64) 明文长度 密文长度 512 428 128 1~53 88 1024 812 216 1~117 172 2048 1588 392 1~245 344
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/20 10:10:51
36楼:
pkcs#8 非对称加密公钥(请使用txt记事本将下面加密字符串存为pub.key文件): -----BEGIN PUBLIC KEY----- MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEA0vmFr5agTGgmie1cFK+j kM5dMIm9RJ50t/vcg5m7n4cqGIf8IJOKD7tI8sezLZuY/g2HFEjy7leMqmyVldOJ fxhv2u3WZ71zP1BKyKTxIlSPF8zp4p+r06K1BCPg+FBJAG62c/alkzy1sx5Pa3G1 MrPBwlrqWVsO8HG4KMp2nbqS426T0ArUgQupML7QDxmvUPR0SNYqfk0c2IFboH4w V10Izta/5H0rHJEFxVE3Ag1AyJwAY0NutjwSWbyQ1gaXuYK9X9wUrNwGa+WS3Bgs aVgAjX71X8zHe/xqX3wJfAQKNq6e1gY/GvNIdNXrc65AK0C/fqNJvfpEv4hObOrS MQIDAQAB -----END PUBLIC KEY----- 非对称加密私钥(请使用txt记事本将下面加密字符串存为pri.key文件): -----BEGIN PRIVATE KEY----- MIIEvgIBADANBgkqhkiG9w0BAQEFAASCBKgwggSkAgEAAoIBAQDS+YWvlqBMaCaJ 7VwUr6OQzl0wib1EnnS3+9yDmbufhyoYh/wgk4oPu0jyx7Mtm5j+DYcUSPLuV4yq bJWV04l/GG/a7dZnvXM/UErIpPEiVI8XzOnin6vTorUEI+D4UEkAbrZz9qWTPLWz Hk9rcbUys8HCWupZWw7wcbgoynadupLjbpPQCtSBC6kwvtAPGa9Q9HRI1ip+TRzY gVugfjBXXQjO1r/kfSsckQXFUTcCDUDInABjQ262PBJZvJDWBpe5gr1f3BSs3AZr 5ZLcGCxpWACNfvVfzMd7/GpffAl8BAo2rp7WBj8a80h01etzrkArQL9+o0m9+kS/ iE5s6tIxAgMBAAECggEAJ+8NK/hR7USFjvP7yvqX9k/peceIqNVpeG3XBp3x0rdt 82jCA5SJvIKRw0qjks1x/xymZeONACpYOOYGxm5dB06j1YfRXp+QkfprvWDjN8FT uIiT+M6KYqvYoaj862Oe/dL2/CpCmwURy47AL7E9QBSgZ154H2PKBx8vYaE5JI+V RWLQBYXt5smmpwitNM4M188VdiyB4IMunjmHzIOtRQZUAFmsYf89XbbjA1yBdOq+ NO/vyGwHLkZyOnO7omacTxBl58FVPL/7HULXrr8KTtimMC/k57HpXKxmaIZUcwHR NuE4T17HKZiC8uwpEfZOb+tww/wyyRL/V/Q3U86asQKBgQDoxOyUgDao5WFKQsVl ZuzCKob4TJRIjMIieIlZv/VH94q/heyOEc8iyIqv9C3iMYHBqD96gwlxh4TrPHO5 jztJDBokdXzVmR+GHCv70YKv/waNFK9rUXaAikMztBSiKxu5MmNrLJYJENYKBOCu mVSAqnOUluEywPeeo0vGClBo3QKBgQDoB8Onw2/4P7JEAUiYYNQiILZ4owuA41fw v+1RJGuRC5xclj9uJriHeQV5Xn1aW3KGAUzNr0ejXVzGD7oYGBaDk4k5jK0G3FJo 91aYo4zGsIvU+/9VEa8Yzw76g8QVi8Ic9M6iSKZUnZeBhMyFeLB0sJ6YxF3hzTMD U/HCejaPZQKBgQCVjH/bYQy9MrJxPbkJTzlp/ly9BqZ2fkj0ULEeQqBaXoZ8SpUT KgoE9Qd1yNH584jEXU57bdkRYdpaMHrBi26xnd7l8b4Eld6VEWCI57CpVpZk6hdS QgJ6z1ohy9892ah0MhWB9CFpLbH2ue+I/eY2zEx5+P4y15vABnZWhKXo2QKBgDhH adWPOeFk0cBc71bGZa3BcYDhSzD/85yZcN51jwGnZ02tw8Tb73YsjH9bw9vewnBu cEqTcTTWuGHx/plJfmx7pJUo4e8AEZ0UIRT01nh66e/HD696kpXZ4zAwNadkNrj/ R/9kz7NGZjEsHM9i7qnfDRjQyFS0iOMNwV4CdqlhAoGBAKQnuRe4DP7fY8OGc5I+ 8U1vcpxlCmIlUPD8dT06aYuC+GTCSSSHeAgegsCRohq1hnGxlnKHfc+OrLQ60UZX St2Z4wSiU8Rdl9dPTLE5TS29ofD3Dptv7yzvTwCEAC2uTA4mS8v0BykAZz+VWdnA KG1lz/Xoaexad6eS+jh/zWV1 -----END PRIVATE KEY-----
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/20 10:17:09
37楼:
e.sign = 88长度 ??? e.sign2 = 88长度 证书密码??? 64byte ? https://blog.csdn.net/lvxiangan/article/details/45487943 e.sign3=sha1 授权 rsa后结果 344长度 rndkey 看上去是整数???
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/20 11:30:25
38楼:
不折腾了搞不清啥逻辑。。能用就行
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/20 16:16:06
39楼:
rndkey it is an integer random value from 7 to 8 digits length.The length of 7 digits is better than 8. So the hash algorithm for e.sign2 you can find in sanctuarylib.dll, so the e.sign can be a simple base64 value alone like desired encoded word, or the same as e.sign2 it doesn't matter. Optionally, this "VGhlIExpY2Vuc2UgaGFzIGJlZW4gY3JhY2tlZA==" can be put as default value to your e.sign, that decodes as "The License has been cracked". Very important is at most e.sign2 and then e.sign3.
----------------------------------------------
-
作者:
2021/3/20 16:46:56
40楼:
sanctuarylib.dll 3.17 MB (3,333,976 字节)
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2021/3/24 10:14:26
41楼:
看不懂,再次睡等社区版注册机。。。
----------------------------------------------
-
作者:
dxe10 (dxe10)
▲▲△△△
-
普通会员
2021/4/5 18:54:18
42楼:
请问各位大神,安装时出现这个该如何解决? http://bbs.2ccc.com/topic.asp?topicid=607294
此帖子包含附件: 大小: 36.3K
----------------------------------------------
-
作者:
2021/4/5 20:59:36
43楼:
再次运行安装程序 卸载了安装的 重来 win7挂光驱 用imdisk会不会好点 ?解压出来安装行?没试过
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
2022/4/23 16:32:43
44楼:
我不要源码,谁能提供一个10.4的keygen补丁啊
----------------------------------------------
-
作者:
2022/8/28 21:26:18
45楼:
我的10.4.2社区版申请的序列号,1年过期了。如果要继续用,看官方说法应该是重新去下载社区版的页面申请新的序列号。问题是,那个页面里面,有个验证机器码的图片,始终显示不出来,翻墙也不行,没法申请了。 19楼 的源代码下载了,编译运行,点 Generate 按钮,弹出异常:Integer overflow; 仔细追踪,发现是出现在这里: procedure SHA1Compress(var Data: TSHA1Context); var A, B, C, D, E, T: Cardinal; // DWord; W: array[0..79] of Cardinal; // DWord; i: integer; begin Move(Data.Buffer, W, Sizeof(Data.Buffer)); for i := 0 to 15 do W[i] := RB(W[i]); for i := 16 to 79 do W[i] := LRot32(W[i - 3] xor W[i - 8] xor W[i - 14] xor W[i - 16], 1); A := Data.Hash[0]; B := Data.Hash[1]; C := Data.Hash[2]; D := Data.Hash[3]; E := Data.Hash[4]; for i := 0 to 19 do begin T := LRot32(A, 5) + F1(B, C, D) + E + W[i] + $5A827999; E := D; D := C; C := LRot32(B, 30); B := A; A := T; end; 。。。。。。。。。 end; 出错的代码是:T := LRot32(A, 5) + F1(B, C, D) + E + W[i] + $5A827999; 整数溢出了。显然这里一串相加,大于 DWord 的大小了。 对于这个代码的算法,我是不懂的。 有其它办法吗?
----------------------------------------------
-
作者:
2022/8/28 22:19:00
46楼:
update: 在官方的社区版下载页面上,有个验证是否机器人的图片,科学上网也出不来。原因:之前没出来,就再也出不来。换了个虚拟机里面的浏览器,出来了。
----------------------------------------------
-
作者:
2023/11/7 16:13:17
47楼:
哪位能讲一下,下面这几个值是怎么获得的? BdsPatchInfo.PatchOffset := ; BdsPatchInfo.FinalizeArrayOffset := ; LicenseManagerPatchInfo.PatchOffset := ; LicenseManagerPatchInfo.FinalizeArrayOffset := ;
----------------------------------------------
-
作者:
2023/11/7 19:39:15
48楼:
47楼: gitee搜 天/rsk
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/ >http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/