如何改变函数的入口地址呢？？？？？？？(200分)

D

ddolphin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-10

• #1

请问：我的程序中有一个函数，我想将它的入口地址改为另外一个函数，
使调用前者的函数名时，具有后者的效果，该怎么办呢？？？

 

5

5rain6sky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-10

• #2

不知道这样算不算——[]

代码:

procedure F1;
begin
 ; ShowMessage('F1');
end;

procedure F2;
begin
 ; ShowMessage('F2');
end;

procedure TForm1.Button3Click(Sender: TObject);
var
 ; F1: procedure;
begin
 ; F1 := @F2;//其实加不加这个@效果是一样的，不过我觉得加上逻辑性强一些
 ; F1;
end;

 

J

jingtao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-10

• #3

不知道你要的是不是HOOK？
我有个代码， 是HOOK WSOCK32。DLL的，比如说说如果有程序要进行网络通讯，
它就要通过WINSOCK调用初始化等，但是它调用的其实是我的函数，我再调用真正的。
并把它记录下来。

 

D

ddolphin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #4

多谢，就是这个意思。

 

D

ddolphin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #5

多人接受答案了。