Delphi里如何获取DLL模块的路径? Exe程序: DLL程序:

20 | 问答知识库用户 |浏览395次
收藏|2014/05/17 22:00
如题

满意回答

2014/05/26 23:18

DELPHI7下面可以这样

exe:

  application.Exename


DLL:

Function GetDllPath(sDllName:string):string;

var

  ModuleFileName:array[0..255] of char; 

begin

  //{取得dll的实际位置}

  GetModuleFileName(GetModuleHandle(sDllName), @ModuleFileName[0], SizeOf(ModuleFileName));

  Result := ModuleFileName;

end;


guest

其他回答(0)
0人关注该问题
待解决问题



+1
 加载中...