dll文件中如何得到自己的路径？(50分)

在dll文件中，怎样才能得到dll文件自身的路径呢？谢谢

procedure aaa;<br>var<br>&nbsp; sDllName &nbsp; &nbsp; &nbsp;: array[0..255] of char;<br>&nbsp; sIniFile &nbsp; &nbsp; &nbsp;: String;<br>begin<br>&nbsp; GetModuleFileName(HInstance,sDllName,255);<br>&nbsp; sIniFile &nbsp; &nbsp; &nbsp; &nbsp;:= &nbsp;ChangeFileExt(sDllName,'.ini');<br>end;

application.ExeName

谢谢ysai。