Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.166 Beiträge
 
Delphi 12 Athens
 
#13

Re: DirectoryExists und IncludeTrailingPathDelimiter

  Alt 2. Apr 2010, 10:29
Wenn im Edit '\' drinsteht, dann wäre es nach dem ExcludeTrailingPathDelimiter ein ''
und wie nun bestätigt ist, entspricht diesem dem Hauptverzeichnis.
'\' entspricht auch dem Hauptverzeichnis und demnach würde das Ergebnis stimmen.

Steht aber wirklich nichts im Edit (PS: ein Trim könnte nicht schaden), dann existiert es nicht.


Delphi-Quellcode:
S := Trim(Edit.Text);
CheckBox1.Checked := (S <> '') and DirectoryExists(ExcludeTrailingPathDelimiter(S));
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat