运行时如何判断当前代码是在exe里还是在dll中?(20分)

W

WilliamGui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-11

• #1

运行时如何判断当前代码是在exe里还是在dll中?
同一个pas文件，被exe project及dll project包含,
执行exe，exe调用dll，
如何判断当前代码是在exe里还是在dll中?
当然，我传递了Application.Handle，用Applicaiton.exename不行

 

J

jingtao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-11

• #2

GetModHandName(Hinst....

 

B

BELLCN

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-11

• #3

var
ModName: array[0..MAX_PATH] of Char;
begin
GetModuleFileName(HInstance, ModName, SizeOf(ModName));


判断 ModName 里是的文件名 是 EXE 还是 DLL

 

B

BELLCN

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-11

• #4

好像还可以直接判断 ModuleIsLib 吧


ModuleIsLib: Boolean; { True if this module is a dll (a library or a package) }

 

W

WilliamGui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-11

• #5

To BELLCN:
thx.有机会多交流.
QQ:4980688