Pfad+Name der aktuellen DLL aus DLL heraus ermitteln...

[brechi]

schöner ist es vielleicht wenn man eine funktion draus macht:

Delphi-Quellcode:

function GetModulePath: String;
var QueryRes: TMemoryBasicInformation;
    LBuffer: String;
begin
  VirtualQuery(@GetModulePath, QueryRes, SizeOf(QueryRes));
  SetLength(LBuffer, MAX_PATH);
  SetLength(LBuffer, GetModuleFileName(Cardinal(QueryRes.AllocationBase), PChar(LBuffer), Length(LBuffer)));
  result := LBuffer;
end;