Delphi FindFirst, FindNext

Thema durchsuchen

Ansicht

Themen-Optionen

FindFirst, FindNext

Ein Thema von nailor · begonnen am 6. Jan 2003 · letzter Beitrag vom 12. Jan 2003

Vorheriger Beitrag

Nächster Beitrag

nailor

Registriert seit: 12. Dez 2002
Ort: Karlsruhe
1.989 Beiträge

#12

8. Jan 2003, 13:37

also

To test for an attribute, combine the value of the Attr field with the attribute constant with the and operator. If the file has that attribute, the result will be greater than 0. For example, if the found file is a hidden file, the following expression will evaluate to True: (SearchRec.Attr and faHidden) <> 0.

Demnach nach faanyfile suchen, für Ordner
(SearchRec.Attr and fadirectory) <> 0 nehmen

und für dateien:
FindFirst('*.*', 0, SearchRec)

oder wie

Michael N.

http://nailor.devzero.de/code/sharpmath/testing/ --- Tests, Feedback, Anregungen, ... aller Art sehr willkommen!
::: don't try so hard - it'll happen for a reason :::