能力值：
( LV2，RANK：10 )
|
-
-
2 楼
膜拜ing
完全不懂 
|
能力值：
( LV9，RANK：3410 )
|
-
-
3 楼
顶
起
|
能力值：
( LV6，RANK：90 )
|
-
-
4 楼
学习了 
|
能力值：
![]()
(RANK：330 )
|
-
-
5 楼
顶
|
能力值：
![]()
(RANK：1060 )
|
-
-
6 楼
我就会几个单词，什么paper呀tiger呀
|
能力值：
( LV9，RANK：1210 )
|
-
-
7 楼
很好很大没看懂 
|
能力值：
( LV9，RANK：970 )
|
-
-
8 楼
C++都炉火纯青了...
|
能力值：
( LV9，RANK：180 )
|
-
-
9 楼
这才是“水牛”了
|
能力值：
( LV13，RANK：410 )
|
-
-
10 楼
血洗,血洗!
框架才是最难的东西...
|
能力值：
( LV8，RANK：130 )
|
-
-
11 楼
太帅了~
膜拜~
|
能力值：
( LV6，RANK：90 )
|
-
-
12 楼
 學習學習!
|
能力值：
![]()
(RANK：570 )
|
-
-
13 楼
收藏~~~~~~~~~~~~
|
能力值：
( LV15，RANK：930 )
|
-
-
14 楼
膜拜~~
|
能力值：
( LV9，RANK：190 )
|
-
-
15 楼
顶起啊!! SHOOOO为Execryptor计划生育
|
能力值：
( LV2，RANK：10 )
|
-
-
16 楼
太强了，顶起
|
能力值：
( LV4，RANK：50 )
|
-
-
17 楼
99% Delphi版
program Project1;
uses
Windows;
var
p : string = '0';
{$R *.res}
function tp_thread(lParam : Pointer) : DWORD; stdcall;
var
Retn : procedure; stdcall;
begin
Retn := lParam;
Retn;
Result := 0;
end;
function tp_proctect : BOOL; stdcall;
var
dwThreadHandle, dwThread : DWORD;
lParam : Pointer;
begin
asm //1%的汇编了 没想到其它的办法那位Delphi牛人指教一下
mov eax, [esp + $14]
mov lParam, eax
end;
dwThreadHandle := CreateThread(nil, 0, @tp_thread, lParam, 0, dwThread);
WaitForSingleObject(dwThreadHandle, INFINITE);
CloseHandle(dwThreadHandle);
Result := True;
end;
begin
MessageBox(0, PChar(p), PChar(p), 0);
{$i tp_start.inc}
Inc(Byte(p[1]));
{$i tp_start.inc}
{$i tp_start.inc}
Inc(Byte(p[1]));
{$i tp_start.inc}
MessageBox(0, PChar(p), PChar(p), 0);
{$i tp_end.inc}
{$i tp_start.inc}
{$i tp_end.inc}
{$i tp_end.inc}
Inc(Byte(p[1]));
{$i tp_end.inc}
{$i tp_start.inc}
MessageBox(0, PChar(p), PChar(p), 0);
{$i tp_end.inc}
{$i tp_end.inc}
end.
{$i tp_start.inc}
if tp_proctect then
begin
{$i tp_end.inc}
end;
|
能力值：
( LV9，RANK：210 )
|
-
-
18 楼
csdn这样说，我是完全不懂，不知道对cat老大有没有帮助 lpParameter指针类型，线程的传入参数，我们如果想给线程执行体ThreadProc传递我们自己的数据，就要通过它
|
能力值：
( LV12，RANK：210 )
|
-
-
19 楼
膜拜 .
|
能力值：
( LV4，RANK：50 )
|
-
-
20 楼
[QUOTE=fonge;384612]csdn这样说，我是完全不懂，不知道对cat老大有没有帮助 lpParameter指针类型，线程的传入参数，我们如果想给线程执行体ThreadProc传递我们自己的数据，就要通过它 [/QUOTE]
嗯
是这样
所以我传入了让他逃跑的地址
|
能力值：
( LV2，RANK：10 )
|
-
-
21 楼
我有一个软件想找人帮我脱壳，付款（￥500RMB）请高人呀，成功脱壳后先款后货！
|
能力值：
( LV2，RANK：10 )
|
-
-
22 楼
上海四环是强啊
|
能力值：
( LV2，RANK：10 )
|
-
-
23 楼
顶起,努力学习中........
|
能力值：
( LV2，RANK：10 )
|
-
-
24 楼
看得迷迷糊糊,想了半天似乎是懂了个七八分
|
能力值：
![]()
(RANK：215 )
|
-
-
25 楼
看不懂的飘过
|
|
|
|
