AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Groß/Kleinschreibung (Pfad) Original erhalten?
Thema durchsuchen
Ansicht
Themen-Optionen

Groß/Kleinschreibung (Pfad) Original erhalten?

Ein Thema von MicMic · begonnen am 18. Aug 2018 · letzter Beitrag vom 1. Okt 2018
Antwort Antwort
MicMic

Registriert seit: 26. Mai 2018
296 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#1

Groß/Kleinschreibung (Pfad) Original erhalten?

  Alt 18. Aug 2018, 18:45
Hallo,
wenn ich in einer Variable "c:\windows\syswow64\" oder "c:\winDows\SYSwow64\" (als Beispiel) stehen habe, kann ich damit arbeiten aber zur Ansicht würde ich gerne die originale Groß-/Kleinschreibung nutzen. Original ist der Pfad "C:\Windows\SysWOW64".

Ich frage mich, wie ich mit einfachen Mitteln (ohne FindFirst/Next) da rankomme.
Vielleicht gibt es eine Win API Funktion die ich dafür nutzen/zweckentfremden kann?

Michael
  Mit Zitat antworten Zitat
Papaschlumpf73

Registriert seit: 3. Mär 2014
Ort: Berlin
325 Beiträge
 
Delphi 12 Athens
 
#2

AW: Groß/Kleinschreibung (Pfad) Original erhalten?

  Alt 18. Aug 2018, 19:11
Such mal hier im Forum nach CSIDL
  Mit Zitat antworten Zitat
MicMic

Registriert seit: 26. Mai 2018
296 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#3

AW: Groß/Kleinschreibung (Pfad) Original erhalten?

  Alt 18. Aug 2018, 19:18
Such mal hier im Forum nach CSIDL
Ist mir ein Begriff, kenne es aber nur in Verbindung mit Standard-Ordner/System-Ordner usw.
Wenn ich jetzt z.B. ein neuen Ordner anlege "C:\TeSt", würde ich gerne ohne FindFirst/Next da herankommen, sprich ich übergebe "c:\test" und bekomme "C:\TeSt" zurück.

Michael
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.691 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: Groß/Kleinschreibung (Pfad) Original erhalten?

  Alt 18. Aug 2018, 21:10
Ich habs nicht getestet, vielleicht gibt Dir ExpandFileName den Namen in schön wieder?
Oder ExtractFilePath ?
Oder System.IOUtils.TPath.GetDirectoryName ?

Reines WinApi würde ich SHGetFileInfo eventuell mit PIDL verwenden, das sollte Dich auch ans Ziel bringen.
Gruß vom KodeZwerg

Geändert von KodeZwerg (18. Aug 2018 um 21:17 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.084 Beiträge
 
Delphi 12 Athens
 
#5

AW: Groß/Kleinschreibung (Pfad) Original erhalten?

  Alt 18. Aug 2018, 21:52
Ich denke, du suchst ExpandFileNameCase

Intern wird dort aber auch auf FindFirst/FindClose zurückgegriffen.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
MicMic

Registriert seit: 26. Mai 2018
296 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#6

AW: Groß/Kleinschreibung (Pfad) Original erhalten?

  Alt 18. Aug 2018, 22:36
Danke für die Hilfestellung.
habe mal alles ausprobiert (ExtractFilePath, ExpandFileName, GetDirectoryName) und mit SHGetFileInfo auch herumexperimentiert.
Keine Erfolge und zu "ExpandFileNameCase"... (kannte ich noch nicht) da kann man etwas herausholen aber dennoch müsste man das Verzeichnis (z.B. "C:\Ich\bin\so\froh\wie\der\Mops\im\Hafenstroh \") splitten und in Strings aufteilen. Am Ende eines Pfads kann man noch "\." oder "\.." angeben um ein oder zwei Verzeichnisse zurück zu gehen und hier die originale Groß-/Kleinschreibung zu bekommen. Nur nicht alles auf einmal. Aber wegen diesem Splitten und stets erneuten Aufruf von FindFirst (auf die Idee bin ich nämlich auch gekommen) - was die Funktion ja macht, ist das alles nicht gerade Optimal. Naja, nicht so schlimm. Trotzdem Danke für eure Hilfestellung.

Michael
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:10 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz