Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Einen Verzeichnis oberbei (https://www.delphipraxis.net/168810-einen-verzeichnis-oberbei.html)

t0mmy 12. Jun 2012 14:13

Einen Verzeichnis oberbei
 
Hallo!

Also mein Problem is das ich einen Pfad habe z.B.:
C:\Programme\Test1\Test2
jetzt möchte ich aus diesem Verzeichnis bzw. String folgendes Verzeichnis ansteuern:
C:\Programme\Test1\
bzw. im String stehen haben.

Ich hätte mir schon einiges Überlegt: Wie den String von hinten nach vorne durchzugehen und dann alles bis \ löschen aber gibts da nicht einen anderen Weg???

jaenicke 12. Jun 2012 14:24

AW: Einen Verzeichnis oberbei
 
Delphi-Quellcode:
ExtractFilePath(ExcludeTrailingPathDelimiter('C:\Programme\Test1\Test2'))

ele 12. Jun 2012 14:28

AW: Einen Verzeichnis oberbei
 
Wenn der Pfad kein abschliessendes '\' enthält kannst du ExtractFileDir() benutzen.

Um sicherzustellen das dies der Fall ist, benutzt man ExcludeTrailingPathDelimiter().

Das Endresultat sieht in etwa so aus:

Delphi-Quellcode:
ParentDir := ExtractFileDir(ExcludeTrailingPathDelimiter(Path))
Du musst aber wahrscheinlich noch den Fall behandeln wenn der Angegeben Pfad ein Wurzelverzeichnis ist (C:\, D:\, etc.)

Edit: jaenicke war schneller

himitsu 12. Jun 2012 14:36

AW: Einen Verzeichnis oberbei
 
ExtractFileDir
ExtractFilePath

"Dir" gibt am Ende nur den Verzeichnisnamen, also einen "Link" direkt auf das Verzeichnis.
"Path" beläßt am Ende ein "\", also das Ganze wird als Pfad zurückgegeben, wo man einfach ein "Dat.ei" angängen könnte.

Nur beim Rootverzeichnis bleibt immer ein "\" am Ende, da "C:" ein relativer Pfad wäre. (bzw. es ist kein Pfad, sondern ein "Laufwerk")

Zitat:

Du musst aber wahrscheinlich noch den Fall behandeln wenn der Angegeben Pfad ein Wurzelverzeichnis ist (C:\, D:\, etc.)
Das sollte hoffentlich schon von diesen Funktionen richtig beachtet werden.

t0mmy 12. Jun 2012 14:57

AW: Einen Verzeichnis oberbei
 
Danke @ jaenicke
Aber auch an alle anderen!

Jumpy 12. Jun 2012 16:21

AW: Einen Verzeichnis oberbei
 
Stellt sich noch die Frage: Wer, wie, was ist ein "oberbei":?::-D:?:

Delphi-Laie 12. Jun 2012 16:23

AW: Einen Verzeichnis oberbei
 
Zitat:

Zitat von Jumpy (Beitrag 1170479)
Stellt sich noch die Frage: Wer, wie, was ist ein "oberbei":?::-D:?:

Ein (hoffentlich nur orthographisch) verstümmelter Oberbajuware?

t0mmy 13. Jun 2012 08:30

AW: Einen Verzeichnis oberbei
 
OMFG, ich hab vollig übersehen mit welch einem Bauerndeutsch ich den Thread hier eröffnet habe. o.O "oberbei" ??? hm Das ist mir hier jetzt peinlich... kann man den Titel nicht irgendwie ändern???

Sir Rufo 13. Jun 2012 08:39

AW: Einen Verzeichnis oberbei
 
Bis heute 14:13 sollte das noch möglich sein. Einfach deinen ersten Beitrag bearbeiten ;)

Haarspalterei ein

C:\Foo\Foo1 ist ein Verzeichnis
C:\Foo\Foo1\ ist ein Pfad

Haarspalterei aus

himitsu 13. Jun 2012 09:22

AW: Einen Verzeichnis oberbei
 
Zitat:

Zitat von t0mmy (Beitrag 1170556)
kann man den Titel nicht irgendwie ändern???

24 Stunden lang, wie schon erwähnt wurde, kannst'e das noch editieren und im Editor auf [Erweitert] klicken.


Zitat:

Haarspalterei ein
sag ich doch :angle:


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:51 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz