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

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

2006-4-20 12:41
40490
收藏
免费 7
支持
分享
最新回复 (81)
雪    币: 50
活跃值: (145)
能力值: ( LV12,RANK:290 )
在线值:
发帖
回帖
粉丝
26
强,自己写,压缩效果还行
2006-4-22 08:55
0
雪    币: 208
活跃值: (376)
能力值: ( LV12,RANK:330 )
在线值:
发帖
回帖
粉丝
27
2006-4-22 14:07
0
雪    币: 203
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
28
支持一下
2006-4-22 16:38
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
nsd
29
支持,开源,写客的越来越多了!!!!!!!
2006-4-22 19:50
0
雪    币: 233
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
30
楼主的所有精华帖都让我获益匪浅  借这里表示由衷的感谢   
2006-4-23 10:48
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
31
支持
2006-4-23 13:32
0
雪    币: 333
活跃值: (40)
能力值: ( LV9,RANK:730 )
在线值:
发帖
回帖
粉丝
32
下下来学习。
2006-4-23 16:06
0
雪    币: 243
活跃值: (205)
能力值: ( LV12,RANK:250 )
在线值:
发帖
回帖
粉丝
33
最初由 forgot 发布
好像唯一一个异常的seh handler就是oep

004631F4 55 PUSH EBP
004631F5 8BEC MOV EBP, ESP
004631F7 83C4 F0 ADD ESP, -10
........

呵呵,有劳forgot还跟了一下。这就是我说的危险的隐藏oep方法,就是用oep覆盖了进程启动时系统压在堆栈里的exitthread地址。这个是发上来前临时决定加上来的,一个异常也没有实在不符合现在壳的要求:)
2006-4-24 09:07
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
34
好好学习一下!
2006-4-25 17:30
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
35
学习一下,感谢楼主
2006-4-26 11:03
0
雪    币: 215
活跃值: (52)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
36
谢谢啊,正在学delphi
2006-4-26 18:19
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
37
see see
2006-4-29 13:48
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
38
呵呵...下载下来看看.............
2006-4-29 22:59
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
39
这样的壳你们脱掉需要多久?
2006-5-1 05:06
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
40
强烈支持一下
2006-5-2 18:04
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
41
太好了,我也要。
2006-5-2 19:04
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
42
2006-5-2 23:17
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
43
谢谢了啊,下来试试
2006-5-3 22:56
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
44
test this message
2006-5-4 05:28
0
雪    币: 372
活跃值: (31)
能力值: ( LV12,RANK:410 )
在线值:
发帖
回帖
粉丝
45
添加了:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
    begin
    leSrcFn.Text:=OpenDialog1.FileName;
    SrcFn:=leSrcFn.Text;
  end;
end;
然后执行加壳,压缩后的exe文件不能运行,是何原因?
2006-5-4 19:13
0
雪    币: 101
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
46
谢谢~~~~~
2006-5-5 15:19
0
雪    币: 219
活跃值: (58)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
47
缺少单元,无法编译
  JwaWinnt, JwaWinBase, JwaWintype, JwaWinUser,
2006-5-5 20:24
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
48
支持,delphi对我来说容易理解
2006-5-6 12:54
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
49
支持一下,好壳
2006-5-6 14:39
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
50
不错啊,喜欢,太感谢了啊
2006-5-6 18:02
0
游客
登录 | 注册 方可回帖
返回
//