Можно ли определить полный путь и имя файла запущенной DLL из самой DLL

uses
 Windows; 

procedure
 ShowDllPath stdcall
;
var

  TheFileName: array
[0..MAX_PATH] of
 char;
begin

  FillChar(TheFileName, sizeof(TheFileName), #0);
  GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
  MessageBox(0, TheFileName, 'The DLL file name is:', mb_ok);
end
;

Другое по теме:

• Надо подключить DLL и использовать некоторые ее функции
• DLL - убийственная утилита
• DLL и ресурсы