怎样取DLL的名称和所在目录？(50分)

B

bluesnow

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-04

• #1

[blue]建立了多个IntraWeb的dll，想共用一个unit的函数，取当前dll所在目录，由于公用一个unit所以不可能指定dll名称（如Mydll.dll）用 hModule := GetModuleHandle('Mydll.dll'); GetModuleFileName(hModule, buf, sizeof(buf)) 取得当前目录，dll怎么得到自己的名称和目录？请各位DX帮忙！[/blue]

 

F

flysand

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-04

• #2

function GetModuleFileName: string;<br>var<br>&nbsp; Buffer: array[0..261] of Char;<br>begin<br>&nbsp; SetString(Result, Buffer, Windows.GetModuleFileName(HInstance,<br>&nbsp; &nbsp; Buffer, SizeOf(Buffer)));<br>end;

 

B

bluesnow

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-04

• #3

to flysand:<br>&nbsp; &nbsp; Windows.GetModuleFileName(HInstance,Buffer, SizeOf(Buffer)) 函数好像只能取exe的文件名称。

 

B

bluesnow

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-04

• #4

又试了一下，GetModuleFileName(HInstance,Buffer, SizeOf(Buffer))可以做到，谢谢flysand