Zitat:
Delphi-Quellcode:
if Copy(inipath,Length(inipath),1) <> '\' then
inipath := inipath +'\';
kennst du schon
IncludeTrailingPathDelimiter (alt
IncludeTrailingBackslash)?
PS: Wenn eine Datei mit Pfad übergeben wird, dann liefert
ExtractFilePath immer ein abschließendes '\' zurück.
Im Gegensatz zu
ExtractFileDir.
(IncludeTrailingPathDelimiter beachtet übrigens diesen Sonderfall)
PSS: Wenn inipath keinen Pfad wäre, sondern leer, dann würde dieses IF Probleme bereiten.
Aus 'test.exe' würde '\deine.ini' was die INI ins Hauptverzeichnis legen würde, wärend die EXE im aktiven Arbeitsverzeichnis liegt.
Also falls du solche '\'-Operationen öfters mal machst.
(Application.ExeName liefert zum Glück immer einen Pfad, so daß dein IF hier nix kaputt machen kann und da immer ein '\' macht dieses IF garnichts, außer sinnlos Rechenzeit zu verschwenden, für das Copy und den Vergleich)