AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language TDirectory.GetFiles und ('C:\Documents and Settings')
Thema durchsuchen
Ansicht
Themen-Optionen

TDirectory.GetFiles und ('C:\Documents and Settings')

Ein Thema von Harry Stahl · begonnen am 20. Feb 2023 · letzter Beitrag vom 28. Feb 2023
Antwort Antwort
Benutzerbild von KodeZwerg
KodeZwerg

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

AW: TDirectory.GetFiles und ('C:\Documents and Settings')

  Alt 20. Feb 2023, 15:02
var attr := TDirectory.GetAttributes('C:\Documents and Settings', false);
Da es sich wie schon erwähnt um einen Link und nicht um ein echtes Verzeichnis handelt, funktioniert TDirectory.GetAttributes nur dann, wenn man den FollowLink-Parameter auf True setzt.
Das ist leider nicht richtig - C:\Documents and Settings gibt es schon ab Windows Vista nicht mehr und es ist auch kein link.
Wenn man ein englisch/amerikannisches Windows hat, hat es auch einen "C:\Documents and Settings" reparse point.
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.045 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#2

AW: TDirectory.GetFiles und ('C:\Documents and Settings')

  Alt 20. Feb 2023, 15:23
Wenn man ein englisch/amerikannisches Windows hat, hat es auch einen "C:\Documents and Settings" reparse point.
Stimmt, die junction gibt es zwar, aber leider führt sie zumindest bei meinem Windows 10 ins nirgendwo:

Code:
C:\>cd "Documents and Settings"

C:\Documents and Settings>dir
 Volume in drive C is Windows
 Volume Serial Number is DA0A-6171

 Directory of C:\Documents and Settings

File Not Found

C:\Documents and Settings>
Und auch trotz FollowLink = True liefert TDirectory.GetAttributes eine Exception, da der intern aufgerufenen CheckGetAttributesParameters dieser Parameter herzlich egal ist.

Guckst du hier: https://superuser.com/questions/4583...es-it-point-to

Nur in Verbindung mit einem entsprechenden Unterordner bekommt man irgendwelche nützlichen Ergebnisse - z.b. wenn ich das hier mache:

Code:
C:\>cd "Documents and Settings"\sglienke

C:\Documents and Settings\sglienke>dir
 Volume in drive C is Windows
 Volume Serial Number is DA0A-6171

 Directory of C:\Documents and Settings\sglienke

17.02.2023  15:01    <DIR>         .
17.02.2023  15:01    <DIR>         ..
31.01.2023  10:37    <DIR>         .dotnet
02.02.2023  08:07    <DIR>         .nuget
11.01.2023  10:57    <DIR>         .templateengine
17.02.2023  15:01    <DIR>         .vscode
02.12.2022  08:33    <DIR>         3D Objects
02.12.2022  08:33    <DIR>         Contacts
20.02.2023  09:53    <DIR>         Desktop
23.01.2023  12:13    <DIR>         Documents
...
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight

Geändert von Stevie (20. Feb 2023 um 15:27 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Dalai
Dalai
Online

Registriert seit: 9. Apr 2006
1.683 Beiträge
 
Delphi 5 Professional
 
#3

AW: TDirectory.GetFiles und ('C:\Documents and Settings')

  Alt 20. Feb 2023, 16:31
Wenn man sich die Berechtigungen von "C:\Documents and Settings" (und anderen Junctions wie C:\Programme) anschaut, stellt man fest, dass diese standardmäßig das Recht "Ordner auflisten / Daten lesen" für Jeder verweigern. Daher ist es kein Wunder, dass man mit
Code:
dir "C:\Documents and Settings"
keine Auflistung von Dateien/Verzeichnissen erhält.

Grüße
Dalai
  Mit Zitat antworten Zitat
jottkaerr

Registriert seit: 2. Jul 2007
Ort: Tuttlingen
81 Beiträge
 
Delphi 10.1 Berlin Professional
 
#4

AW: TDirectory.GetFiles und ('C:\Documents and Settings')

  Alt 28. Feb 2023, 15:18
In der c't, Ausgabe 5/2023, gibt es dazu auf Seite 164 einen ausführlichen Artikel ("Du willst hier nicht rein").

Für diejenigen mit Zugriff auf die Online-Ausgabe: Man findet ihn auch unter https://www.heise.de/select/ct/2023/...13311570153906

Grüße,
Jürgen
Jürgen Krämer
Sometimes I think the surest sign that intelligent life exists elsewhere
in the universe is that none of it has tried to contact us. (Calvin)
  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 11:48 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-2025 by Thomas Breitkreuz