Verzeichnis in dem die exe ist rausfinden

[Golze]

Hollo zusammen,
ich finde alle bisherigen Antworten nicht so ganz passend. Wenn z.B. in einer DLL nach dem aktuellen Programm gesucht werden soll, ist das nicht so einfach. Die beste Lösung erscheint mir bisher immer noch ParamStr. Es geht aber auch mit

Delphi-Quellcode:

var
  ActualBufferLength: Cardinal;
  FilenameBuffer: array[0..260] of Char;
begin
  ...
  ActualBufferLength := GetModuleFileName(0, FilenameBuffer, SizeOf(FilenameBuffer));
  if ActualBufferLength > 0 then
  begin
    SetLength(aString, ActualBufferLength);
    aString := Copy(FilenameBuffer, 1, ActualBufferLength);
  end;
  ...

Das geht garantiert auch in einer DLL oder wo auch immer.

Grüße