Zitat von
Oldy:
ExtractFilePath(Application.ExeName)+'\'+Application.ExeName
C:\Programm\Prog.exe
@Oldy: hast du es mal ausprobiert?
Delphi-Quellcode:
ExtractFilePath(Application.ExeName) + ExtractFileName(Application.ExeName)
ExtractFileDir(Application.ExeName) + '\' + ExtractFileName(Application.ExeName)
IncludeTrailingBackslash(ExtractFileDir(Application.ExeName)) + ExtractFileName(Application.ExeName)