DLL içinden, DLL in çalıştığı tam yolu bulmak

[vkamadan]

Merhabalar,
Executable projelerde olduğu gibi, Application.ExeName özelliğini ele alarak gerekli parse işlemleriyle dizin yolunu bulabiliyorduk, DLL içinde Application nesnesi yok, bunun başka bir yolu varmıdır?
Teşekkürler.

[vkamadan]

Merhaba,
Bu fonksiyonla DLL içinden o DLL in tam yolunu alabiliyorum.

Kod: Tümünü seç

function DLLPathGetir: WideString;
var
  Path: array[0..MAX_PATH] of Char;
begin
    SetString(Result, Path, GetModuleFileName(HInstance, Path, SizeOf(Path)));
    Result:=Copy(Result,5,Length(Result)-4); //sonucun başında "\\?\" karakteri var bunları atıyorum
end;

Kolay gelsin.