Shell Execute verallgemeinern

[Popov]

Zitat von resyiii:

und jetzt nochmal ne erklärung für dumme?!

ne jetzt im ernst, versteh nur bahnhof

Delphi-Quellcode:

var
  ProgVerzeichnis,
  ProgPfad: String;
begin
  //Pfad der Anwendung, z. B. c:\meinprogramm\programm.exe
  ProgPfad := ParamStr(0);

  //Pfad ohne Anwendung, z. B. c:\meinprogramm\ mit Backslash am Ende
  ProgVerzeichnis := ExtractFilePath(ParamStr(0));
end;