Hi DPler,
wie man den Dateinamen der aktuellen EXE rausbekommt wissen die meisten ja.
- Application.ExeName
- ParamStr(0)
sind die beiden Möglichkeiten.
Wenn man jetzt aber eine
DLL geschrieben hat, erhält man mit diesen Methoden den Dateinamen der aufrufenden Applikation und nicht den der
DLL. Folgender Code löst dieses Problem recht einfach.
Code:
function ShowDllPath: String; stdcall;
var
TheFileName : array[0..MAX_PATH] of char;
begin
FillChar(TheFileName, sizeof(TheFileName), #0);
GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
Result := TheFileName;
end;
Basisidee: Borland Delphi FAQ: #16703