Pfad ermitteln in welchen das Programm ausgeführt wird

[Canton]

or so:

Delphi-Quellcode:

function GebMirStartPfad : string;
var
ExePfad : String;

begin
ExePfad := ExtractFilePath(Application.ExeName);
result:=ExePfad;
end;

ach ja ExtractFilePath is ne Funktion von Sysutils