Autor: Adam Płaszczyca (trzypion_at_waw.pdi.net)
Data: Thu 14 Sep 2000 - 23:35:04 MET DST
Animek napisał(a):
> uses Sysutils;
>
> var
> Info : TSearchRec;
>
> begin
> FindFirst ('f:\*.*', faArchive, Info);
> [tu operuje plikiem]
> FindClose(Info);
> end.
>
> w/w program znajduje tylko jeden plik, mimo że w katalogu jest ich całe mnóstwo.
> Dlaczego ?
A gdzie Ty pobierasz te następne pliki?
O ile pamiętam to powinno być:
findfirst(....)
do while doserror=0
begin {operujesz plikami}
findnext(info)
end;
>
> Nie wiem dlaczego, gdy zamiast faArchive wstawię faAnyFile to nie znajduje nic...
>
> BTW: Czy jest gdzieś w sieci dokumentacja na temat SYBIL Pascala ?
>
> p.s. to mój pierwszy program w SYBIL (tym się pocieszam ;))))
> Wcześniej był tp 7.0)
>
> Animek - tehnik
> mailto:Animus_at_bbs.chip.pl http://www.athys.prv.pl
>
> --
> Wygraj bezprzewodowa klawiature i mysz! http://konkurs.rubikon.pl
--
___________ (R)
/_ _______ Adam Płaszczyca (+48 502) 122 688
___/ /_ ___ ul. Ludwiki 1 m. 74, 01-226 Warszawa
_______/ /_ IRC: _555, http://mike.oldfield.org.pl/
___________/ mail: _555_at_irc.pl UIN: 4098313
To archiwum zostało wygenerowane przez hypermail 2.1.7 : Tue 18 May 2004 - 15:28:22 MET DST