Forum: Programmieren allgemein
by F.W.,
22. Mai 2004
Das isses! NTFS! Auf meinem andern PC (kein NTFS) geht's, danke!!!! :thuimb:
Forum: Programmieren allgemein
by F.W.,
21. Mai 2004
Da ich sowieso alles auflisten möchte, nehme ich immer faAnyFile!
Forum: Programmieren allgemein
by F.W.,
21. Mai 2004
Das hatte ich schonmal, ist aber inzwischen weg, so geht's ja, aber bei diesem Ordner nicht!
Es kann sein, dass andere Ordner auch nicht, aber der ist mir gerade aufgefallen!
Forum: Programmieren allgemein
by F.W.,
18. Mai 2004
Nee, ich meine den Ordner "Cookies" in den Dokumente und Einstellungen! Dort sind doch Dateien drin, die listet mir die Procedure nicht auf!
Das muss doch unter Dach und Fach zu bekommen sein!
Forum: Programmieren allgemein
by F.W.,
18. Mai 2004
Das weiß ich inzwischen schon -> http://www.delphipraxis.net/internal_redirect.php?t=25730&highlight=
aber ich habe diese Abfrage mal weggelassen, da hat es mir die Cookies auch nicht aufgelistet!
Forum: Programmieren allgemein
by F.W.,
18. Mai 2004
Ich habe folgenden Source:procedure DateiListe(Pfad, Name: String; SubDirs: Boolean;
Attr: Integer; Ausgabe: TStrings);
var
F1, F2: TSearchRec;
A: Char;
begin
Pfad := SetPfad(Pfad, True);
if FindFirst(Pfad+Name, Attr, F1) = 0 then begin
if (F1.Name <> '.') and (F1.Name <> '..') then begin
Case F1.Attr of