[Lazarus][Linux] FindFirst i Attr

Article View: pl.comp.lang.pascal

Article #92018

Back to pl.comp.lang.pascal Previous Next

#92018

From: Terrmit
Date: Wed, 25 Jul 2007 15:10

17 lines
1199 bytes

Witam

jest := FindFirst(Path + '*', faAnyFile, SR);
dla katalogu i linku symbolicznego do katalogu:
SR.Attr = $30
SR.ExcludeAttr = $00
dla pliku i linku symbolicznego do pliku
SR.Attr = $20
SR.ExcludeAttr = $20

To jak odróżnić katalog od linku i plik od linku symbolicznego?

Może ktoś mógłby pomóc, bo już wymiękam.
Za wszelkie wskazówki z góry dziękuję.

Pozdrawiam,
   Sławek

Technical Details

Message-ID: <f87pe4$j98$1@nemesis.news.tpi.pl>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail
From: Terrmit <terrmitv@poczta.onet.pl>
Newsgroups: pl.comp.lang.pascal
Subject: [Lazarus][Linux] FindFirst i Attr
Date: Wed, 25 Jul 2007 17:10:20 +0200
Organization: tp.internet - http://www.tpi.pl/
Lines: 17
Message-ID: <f87pe4$j98$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: fge166.internetdsl.tpnet.pl
Mime-Version: 1.0
X-Trace: nemesis.news.tpi.pl 1185376516 19752 83.13.160.166 (25 Jul 2007 15:15:16 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Wed, 25 Jul 2007 15:15:16 +0000 (UTC)
User-Agent: Thunderbird 1.5.0.12 (X11/20070530)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit