DirectoryExists

[H.Bothur]

Moin,

ich werde hier gerade wahnsinnig weil ich was nicht verstehe:

System: WIN10 Prof 20H2
Delphi: 10.3 Version 26.0.32429.4364

Ich prüfe mit DirectoyExists ob ein bestimmtes Verzeichnis existiert:

Delphi-Quellcode:

  if not DirectoryExists(DatenVerzeichnis) then
  begin

Jetzt bekomme ich immer ein false, weiß aber nicht warum. Ich hänge bewusst zwei Bilder an: Einmal ein Hardcopy von Delphi in dem man den Inhalt von "Datenverzeichnis" sehen kann und ein Hardcopy vom TotalCommander in dem man sehen kann wie das Verzeichnis heißt.

Übrigens ... das Programm hat lange klaglos gearbeitet und macht jetzt diese Macken ... kann das jemand erklären ?

Danke
Hans

[himitsu]

Was steht in DatenVerzeichnis?
[edit] es sieht richtig aus,
aber kopiere doch mal den Pfad aus dem Explorer/FileBrowser
und kopiere den Inhalt der Variable
in einen Editor untereinander ... vielleicht stimmt ja doch was nicht ganz.

PS: siehe auch IOUtils
TDirectory.Exists

[DieDolly]

Zitat:

das Programm hat lange klaglos gearbeitet und macht jetzt diese Macken

Was ist vor "jetzt" passiert, was hat sich geändert?

Ganz nebenbei: "Laufwerk nicht erreichbar" anzuzeigen, nur weil ein Verzeichnis nicht existiert, ist irreführend.

[tomkupitz]

"...\OraMail\V1.4" <-> "...\OralogMail\V1.4" ???

[himitsu]

Ja stimmt. "irgendwelche" Fehlermeldungen NIEMALS anzeigen.

GetLastError + SysErrorMessage, so bekommst den "richtigen" Fehlercode/Meldung von der API (DirectoryExists).
"zusätzlich" vorher/hinterher noch ein eigener Text ist OK, aber NIEMALS die "richtige" Fehlermeldung unterdrücken/zerstören.

[H.Bothur]

Zitat:

Zitat von tomkupitz (Beitrag 1488332)

"...\OraMail\V1.4" <-> "...\OralogMail\V1.4" ???

Danke ... das war es ... ich habe da wirklich eine Stunde draufgekuckt und es nicht gesehen !

Hans

[H.Bothur]

Zitat:

Zitat von himitsu (Beitrag 1488334)

Ja stimmt. "irgendwelche" Fehlermeldungen NIEMALS anzeigen.

GetLastError + SysErrorMessage, so bekommst den "richtigen" Fehlercode/Meldung von der API (DirectoryExists).
"zusätzlich" vorher/hinterher noch ein eigener Text ist OK, aber NIEMALS die "richtige" Fehlermeldung unterdrücken/zerstören.

Da hast Du recht - das baue ich noch passend ein!

Hans

[Bernhard Geyer]

Zitat:

Zitat von H.Bothur (Beitrag 1488336)

Danke ... das war es ... ich habe da wirklich eine Stunde draufgekuckt und es nicht gesehen !

Kommt mir bekannt vor :-)

[himitsu]

Darum auch das "Kopieren" und direkt untereinander angucken ... war auch schon tagelang blind.

[Maekkelrajter]

Zitat:

Zitat von himitsu (Beitrag 1488345)

Darum auch das "Kopieren" und direkt untereinander angucken ... war auch schon tagelang blind.

Das hilft auch nicht immer. Manchmal muss man schon einen Hex-Editor bemühen, um exakte Gleichheit bzw. Unterschiede zweier Strings festzustellen (s.Anhang). Genau dieses Beispiel war der Grund, dass ich vor einigen Jahren von Delph 4 auf ein moderneres Delphi mit voller Unicode-Unterstützung gewechselt habe. Damals hatte ich nämlich tagelang gegrübelt, weshalb eine Datei nicht gefunden wurde.

gruß LP