AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Delphi-PRAXiS - Lounge Betriebssysteme ':' im Dateinamen - Bug oder Feature?
Thema durchsuchen
Ansicht
Themen-Optionen

':' im Dateinamen - Bug oder Feature?

Ein Thema von Woodman · begonnen am 12. Jul 2015 · letzter Beitrag vom 17. Jul 2015
 
Benutzerbild von Woodman
Woodman

Registriert seit: 17. Mär 2007
74 Beiträge
 
Delphi 10.1 Berlin Starter
 
#1

':' im Dateinamen - Bug oder Feature?

  Alt 12. Jul 2015, 19:27
Betriebssystem: Win 8.1
Hallo Wissende,

für ein Projekt habe ich mir eine .ini-Datei erstellt, um mir dort Dateinamen merken zu können. Diese Dateinamen haben den Namen des Projektes und eine fortlaufende Nummer. Aus Versehen habe ich den Projektnamen ungefiltert übernommen - und so hieß ein (Test-)Projekt:
"Großer Test: Jetzt gehts" Dem entsprechent sah auch meine .ini-Datei aus:
Code:
[Parameter]
Projektname=Großer Test: Jetzt gehts
SLDName=I:\Urlaubsfotos\2012.08.17-09.21 Aus.SA+Center\Vortrag\2. Testvortrag\TestVortrag.sld
[MediaText]
0001_Text=Großer Test: Jetzt gehts_0001.rtf
0002_Text=Großer Test: Jetzt gehts_0002.rtf
0003_Text=Großer Test: Jetzt gehts_0003.rtf
0004_Text=Großer Test: Jetzt gehts_0004.rtf
0005_Text=Großer Test: Jetzt gehts_0005.rtf
0006_Text=Großer Test: Jetzt gehts_0006.rtf
0007_Text=Großer Test: Jetzt gehts_0007.rtf
Als mir endlich auffiel: ':' im Namen geht ja garnicht
Aber: Es ging!
Alle Text, die ich dort erfasst hatte ließen sich wieder aufrufen!
Im Explorer sah die Datei allerdings so aus:

Eine leere Datei mit dem Namen bis zum ':'! Wenn ich diese Datei gelöscht habe, hat mein Programm die die rtf-Dateien auch nicht mehr gefunden.

Um dieses Phänomen etwas näher zu untersuchen habe ich mir ein Miniprojekt geschrieben (Siehe Anhang). Die beiden Routinen sehen dabei so aus:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
// SetCurrentDir(Edit1.Text);
  CurrentDocFile := Edit1.Text+'\'+Edit2.Text;
  RichEdit1.Lines.SaveToFile(CurrentDocFile);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  RichEdit1.Clear;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
// SetCurrentDir(Edit1.Text);
  CurrentDocFile := Edit1.Text+'\'+Edit2.Text;
  if FileExists(CurrentDocFile) then
     RichEdit1.Lines.LoadFromFile(CurrentDocFile)
  else
     ShowMessage('Datei "'+CurrentDocFile+'" nicht gefunden');
end;
Ich habe einen 4GB-USB-Stick mit NTFS formatiert und konnte auf diese Art und Weise etliche RTF-Dateien erzeugen und auch wieder lesen.! Zur Sicherheit habe ich dann noch eine größere Videodatei auf den Stick geladen und alle RTF-Dateien waren noch lesbar! So sieht es jetzt auf dem Stick aus:


Diese Geschichte funktioniert nur unter NTFS! Ist der Stick mit FAT32 formatiert, bekomme ich sofort eine Fehlermeldung wegen ungültigen Dateinamens.

Also: Ist dieses Verhalten von NTFS ein Bug oder ein Feature?
Angehängte Grafiken
Dateityp: jpg Explorer-Auszug.jpg (20,9 KB, 139x aufgerufen)
Dateityp: jpg Explorer-Auszug2.jpg (54,5 KB, 142x aufgerufen)
Angehängte Dateien
Dateityp: zip Test Filenames.zip (55,2 KB, 6x aufgerufen)
Keep
Horst
Delphi 10.1 Berlin Starter unter Windows 10 - 1803
  Mit Zitat antworten Zitat
 


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 04:24 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