首页
社区
课程
招聘
发一个纯正delphi血统的压缩壳(含源码)
发表于: 2006-4-20 12:41 40488

发一个纯正delphi血统的压缩壳(含源码)

2006-4-20 12:41
40488

这些天新壳大爆发啊,我也来凑个热闹。
又是一个自娱自乐的产物,和netsowell发布过源码的那个不一样,这个壳90%的代码是用delphi写成的。
仅在win2k+sp4上测试过,不支持9x系统。因为用了一个可能不安全的隐藏oep的方法,xp系统上有可能会出问题。
没花,没anti代码,适合初学者了解壳。
现在只能压缩exe文件。
压缩包里含源码,算是为这里的delphi初学者的小礼物。


[注意]传递专业知识、拓宽行业人脉——看雪讲师团队等你加入!

上传的附件:
收藏
免费 7
支持
分享
最新回复 (81)
雪    币: 47147
活跃值: (20445)
能力值: (RANK:350 )
在线值:
发帖
回帖
粉丝
2
我将帖转到脱壳版块去
2006-4-20 12:46
0
雪    币: 217
活跃值: (91)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
3
强烈支持delphi开源
2006-4-20 13:14
0
雪    币: 342
活跃值: (323)
能力值: ( LV9,RANK:450 )
在线值:
发帖
回帖
粉丝
4
支持,直接利用delphi语法来写壳的shell部分其实是有很多优势的,我的新壳也差不多90%是直接使用delphi语法。这样就可以玩代码战。
2006-4-20 13:17
0
雪    币: 242
活跃值: (163)
能力值: ( LV9,RANK:250 )
在线值:
发帖
回帖
粉丝
5
最初由 ww990 发布
强烈支持delphi开源


9494
2006-4-20 13:26
0
雪    币: 217
活跃值: (91)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
6
JwaWinnt, JwaWinBase
这是啥控件,D10无法编译,不知是什么原因
2006-4-20 14:05
0
雪    币: 301
活跃值: (300)
能力值: ( LV9,RANK:290 )
在线值:
发帖
回帖
粉丝
7
谢谢啊
2006-4-20 14:07
0
雪    币: 243
活跃值: (205)
能力值: ( LV12,RANK:250 )
在线值:
发帖
回帖
粉丝
8
最初由 ww990 发布
JwaWinnt, JwaWinBase
这是啥控件,D10无法编译,不知是什么原因

delphi-jedi的API Conversion Library:
ftp://delphi-jedi.org/api/win32api.zip
2006-4-20 14:24
0
雪    币: 217
活跃值: (91)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
9
thank you
2006-4-20 14:37
0
雪    币: 211
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
10
支持!
2006-4-20 14:41
0
雪    币: 236
活跃值: (74)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
11
谢谢分享,下下来研究研究
2006-4-20 17:24
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
12
这个壳强不强压,我来试试看
2006-4-20 17:37
0
雪    币: 234
活跃值: (370)
能力值: ( LV9,RANK:530 )
在线值:
发帖
回帖
粉丝
13
支持啊,不懂delphi
2006-4-20 20:42
0
雪    币: 207
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
14
压缩效果一般 其他的就 ................
2006-4-20 21:12
0
雪    币: 47147
活跃值: (20445)
能力值: (RANK:350 )
在线值:
发帖
回帖
粉丝
15
最初由 qq7119 发布
压缩效果一般 其他的就 ................


压缩效果与所使用的压缩引擎有关,这个实例用的是aPlib,当然压缩效果一般了,你想获得好的压缩效果,可以换其他压缩引擎。但这个实例目的不是来展示其压缩效果,而是演示一下如何用delphi写加壳程序,以对其他写壳的朋友有些帮助。
2006-4-20 21:50
0
雪    币: 1041
活跃值: (19)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
16
支持发布源码,Delphi本人正在学习中
2006-4-20 23:18
0
雪    币: 247
活跃值: (18)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
17
支持一下,谢谢
2006-4-21 00:25
0
雪    币: 0
能力值: (RANK:10 )
在线值:
发帖
回帖
粉丝
18
高手出现!
2006-4-21 08:09
0
雪    币: 243
活跃值: (205)
能力值: ( LV12,RANK:250 )
在线值:
发帖
回帖
粉丝
19
最初由 kanxue 发布
压缩效果与所使用的压缩引擎有关,这个实例用的是aPlib,当然压缩效果一般了,你想获得好的压缩效果,可以换其他压缩引擎。但这个实例目的不是来展示其压缩效果,而是演示一下如何用delphi写加壳程序,以对其他写壳的朋友有些帮助。

呵呵,就是这样,仅仅是演示代码,没什么实际用途的,只是没见过类似的,就发出来了。
因为工作和写代码没任何关系,写代码都是打发时间,所以对delphier可能有点帮助的都会发源码上来,大家也不要有什么期望
2006-4-21 09:03
0
雪    币: 0
能力值: (RANK:10 )
在线值:
发帖
回帖
粉丝
20
如何使他支持DLL压缩?讨教一下!
2006-4-21 10:47
0
雪    币: 47147
活跃值: (20445)
能力值: (RANK:350 )
在线值:
发帖
回帖
粉丝
21
最初由 爱一个人好难 发布
如何使他支持DLL压缩?讨教一下!


个人感觉再加上一个重定位表处理部分,就能支持DLL了。
2006-4-21 10:53
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
qqb
22
谢谢分享!
2006-4-21 17:07
0
雪    币: 6075
活跃值: (2236)
能力值: (RANK:1060 )
在线值:
发帖
回帖
粉丝
23
好像唯一一个异常的seh handler就是oep

004631F4    55              PUSH    EBP
004631F5    8BEC            MOV     EBP, ESP
004631F7    83C4 F0         ADD     ESP, -10
004631FA    B8 C42F4600     MOV     EAX, 00462FC4
004631FF    E8 2C34FAFF     CALL    00406630
00463204    A1 C8504600     MOV     EAX, [4650C8]
00463209    8B00            MOV     EAX, [EAX]
0046320B    E8 A056FFFF     CALL    004588B0
00463210    8B0D B0514600   MOV     ECX, [4651B0]                    ; V2Packer.00466CE0
00463216    A1 C8504600     MOV     EAX, [4650C8]
0046321B    8B00            MOV     EAX, [EAX]
0046321D    8B15 68134600   MOV     EDX, [461368]                    ; V2Packer.004613B4
00463223    E8 A056FFFF     CALL    004588C8
00463228    A1 C8504600     MOV     EAX, [4650C8]
0046322D    8B00            MOV     EAX, [EAX]
0046322F    E8 1457FFFF     CALL    00458948
00463234    E8 3F0FFAFF     CALL    00404178

遇到int3的时候去[fs:[0]+4]就行了
2006-4-21 18:24
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
24
想学DELPHI,谢谢
2006-4-21 20:54
0
雪    币: 671
活跃值: (723)
能力值: ( LV9,RANK:1060 )
在线值:
发帖
回帖
粉丝
25
呵呵,强文一篇
2006-4-22 07:47
0
游客
登录 | 注册 方可回帖
返回
//