Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
30. Aug 2008
Hallo Jens,
dein Hinweis ist zwar nicht falsch, aber für einen wirklichen Anfänger mindestens so verwirrend, wie das unerwartete Ergebnis bei FindFirst(..., faHidden + faHidden, ...). Wenn du also etwas für die Ausbildung der Ungelernten tuen möchtest, dann musst du die Zusammenhänge erläutern oder einen Link setzen. Ich wollte mir das ersparen.
Mit Compiler Magic hat das Addieren von...
Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
30. Aug 2008
Halloo Chris,
vielleicht wurden den beiden Ordnern zusätzliche Attribute verliehen?
if FindFirst(path + '*.*', faDirectory + faSysFile + faHidden, search) = 0 then
repeat
if ((search.attr and fadirectory) = fadirectory)
and (Pos(search.name, '..') = 0)) then
begin