String mit Dateipfad umstellen

[Uwe Raabe]

Und nun noch für die mit neuerem Delphi:

Delphi-Quellcode:

uses
  System.IOUtils;

...

  Pfad := 'C:\Users\Admin\Documents\Embarcadero\Studio\Projekte\Win32\Debug\Project1.exe';

  ExeName := TPath.GetFileName(Pfad); 
  PrjName := TPath.GetFileNameWithoutExtension(Pfad); 
  DirName := TPath.GetDirectoryName(Pfad);

  output := string.Join('|', [PrjName, ExeName, DirName]);