Und um es sauber zu machen, statt Backslash lieber den
PathDelimiter verwenden:
Delphi-Quellcode:
ExtractFileDir(Application.ExeName) + PathDelim + ExtractFileName(Application.ExeName)
IncludeTrailingPathDelimiter(ExtractFileDir(Application.ExeName)) + ExtractFileName(Application.ExeName)