🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.lang.pascal
13 messages
13 total messages Started by Tomasz Jaruga Mon, 14 Dec 1998 22:13
Jak posortować pliki?
#91
Author: Tomasz Jaruga
Date: Mon, 14 Dec 1998 22:13
31 lines
1676 bytes
W programie mam coś takiego:

...
FindFirst ('*.dat', AnyFile, info);
if DosError=18
then Writeln ('Brak dostepnych plikow') else
begin
 repeat
  with info do
  begin
  ...
  {tu następuje wypisanie plików}
  ...
  end;
 FindNext (info);
 until DosError<>0;
end;
...

I teraz:

Pliki, które uzyskuję w wyniku przeszukania są uporządkowane wg. daty
utworzenia.
Jak zrobić, aby posortować wyszukane pliki np. alfabetycznie?

PS. "info" to zmienna: "info : SearchRec; "
-- 
     Tomasz Jaruga     #     GED>E$ d- s+:-- a22 C++ UL++ P- L++ E+ W++ N++
   tmpj@friko.onet.pl   #       o? K? w(---) O? M? V? PS+ PE++ Y? PGP+ t 5?
  http://come.to/tmpj/   #         X- R- tv- b+ DI? D- G e h!>h--- r++ y+++
#########################  Powered by Linux 2.0.36 RedHat 5.1 Manhattan  ##
Re: Jak posortować pliki?
#92
Author: Jarek Kucypera
Date: Tue, 15 Dec 1998 11:24
16 lines
1277 bytes
Tomasz Jaruga napisał(a) w wiadomości: ...
>FindFirst ('*.dat', AnyFile, info);
[ciach]
> FindNext (info);
>Pliki, które uzyskuję w wyniku przeszukania są uporządkowane wg. daty
>utworzenia.
>Jak zrobić, aby posortować wyszukane pliki np. alfabetycznie?


Z tego co wiem, to nie można zmienić sposobu przeszukiwania
katalogów (FindFirst i FindNext odwołują się bezpośrednio do
analogicznych funkcji DOSa, tam może coś znajdziesz) inaczej
niż przez samodzielne posortowanie.

J.K.
Re: Jak posortować pliki?
#95
Author: Marcin Rutkowski
Date: Tue, 15 Dec 1998 12:12
17 lines
1543 bytes
>Pliki, które uzyskuję w wyniku przeszukania są uporządkowane wg. daty
>utworzenia.
O ile pamiętam to pliki nie są uporządkowane wg. daty tylko wg. kolejności w
jakiej się pojawiły w katalogu. Jak się jakiś plik skasuje to powstaje
(IMHO) dziura, w którą może "wepchnąć się" następny plik, który się tam
wgra.


>Jak zrobić, aby posortować wyszukane pliki np. alfabetycznie?
większość znanych programów wczytuje listę plików (nazw, itp.) do pamięci i
tam ją sortuje.
A sortowanie tablic to już całkiem inna bajka.

--
Marcin Rutkowski
MAIL: marcinru@mail.onet.pl
WWW: http://friko.onet.pl/el/marcinru/
Re: Jak posortować pliki?
#100
Author: Robert Osowiecki
Date: Tue, 15 Dec 1998 14:19
15 lines
1243 bytes
Our dear friend Tomasz Jaruga wrote:


> Pliki, które uzyskuję w wyniku przeszukania są uporządkowane wg. daty
> utworzenia.
> Jak zrobić, aby posortować wyszukane pliki np. alfabetycznie?

To tylko przez przypadek: DOS nie sortuje plików w żaden sposób - 
u ciebie pewnie posortował defragmenter. Nie ma rady - musisz sortować
sam.

-- 
~~~~~~~ *MagiC* Robson ~~~~~~~ http://rainbow.mimuw.edu.pl/~robson ~~~~~~~
One Framling to bring them all and in the darkness bind them
In the Land of Mordor where the Shadows Lie
Re: Jak posortować pliki?
#93
Author: Tomasz Jaruga
Date: Tue, 15 Dec 1998 21:34
26 lines
2133 bytes
Dnia Tue, 15 Dec 1998 12:24:13 +0100, Jarek Kucypera napisał(a):
>>FindFirst ('*.dat', AnyFile, info);
>[ciach]
>> FindNext (info);
>>Pliki, które uzyskuję w wyniku przeszukania są uporządkowane wg. daty
>>utworzenia.
>>Jak zrobić, aby posortować wyszukane pliki np. alfabetycznie?
>
>
>Z tego co wiem, to nie można zmienić sposobu przeszukiwania
>katalogów (FindFirst i FindNext odwołują się bezpośrednio do
>analogicznych funkcji DOSa, tam może coś znajdziesz) inaczej
>niż przez samodzielne posortowanie.

A czy ktoś może ma takie coś napisane w miarę zwięźle i krótko?
Plików jest max. 200. I wszystkie mają rozszrzenie .dat i są trzymane w
jednym katalogu. Chodzi tylko o posortowanie nazw po odczytaniu ich
poprzez FindFirst i FindNext (alfabetycznie).

Byłbym bardzo wdzięczny za coś takiego (na priva, żeby nie zasmiecać).

-- 
     Tomasz Jaruga     #     GED>E$ d- s+:-- a22 C++ UL++ P- L++ E+ W++ N++
   tmpj@friko.onet.pl   #       o? K? w(---) O? M? V? PS+ PE++ Y? PGP+ t 5?
  http://come.to/tmpj/   #         X- R- tv- b+ DI? D- G e h!>h--- r++ y+++
#########################  Powered by Linux 2.0.35 RedHat 5.1 Manhattan  ##
Re: Jak posortować pliki?
#94
Author: Piotr Neevor Bochaczyk
Date: Thu, 17 Dec 1998 00:00
16 lines
1407 bytes
> A czy ktoś może ma takie coś napisane w miarę zwięźle i krótko?
> Plików jest max. 200. I wszystkie mają rozszrzenie .dat i są trzymane w
> jednym katalogu. Chodzi tylko o posortowanie nazw po odczytaniu ich
> poprzez FindFirst i FindNext (alfabetycznie).
> 
> Byłbym bardzo wdzięczny za coś takiego (na priva, żeby nie zasmiecać).
Wysle ci to na newsy w piatek lub w poniedzialek, jesli jeszcze
potrzebujesz... Najlepiej odpisz do mnie na priva.

                 __          Piotr ,,Neevor'' Bochaczyk	
  ___   ___     __    ___    member of Team OS/2 Poland	
 _   _ _       __   _    _   & Asu'a Programmers Group	
 _   _  __    __       _				
 _   _    _  __      _       nee...@teamos2.org.pl	
  ___  ___  __     ______				
           __                Uroda x Rozum = const	
Re: Jak posortować pliki?
#101
Author: LO Radymno
Date: Mon, 21 Dec 1998 13:05
32 lines
1456 bytes
Tomasz Jaruga wypocił wiadomość:
>W programie mam coś takiego:
>
>...
>FindFirst ('*.dat', AnyFile, info);
>if DosError=18
>then Writeln ('Brak dostepnych plikow') else
>begin
> repeat
>  with info do
>  begin
>  ...
>  {tu następuje wypisanie plików}
>  ...
>  end;
> FindNext (info);
> until DosError<>0;
>end;
>...
>
>I teraz:
>
>Pliki, które uzyskuję w wyniku przeszukania są uporządkowane wg. daty
>utworzenia.
>Jak zrobić, aby posortować wyszukane pliki np. alfabetycznie?
>


Zrób sobie plik z direm całego katalogu np. przez Exec...

Have a nice day!
Re: Jak posortować pliki?
#102
Author: deMon
Date: Fri, 25 Dec 1998 18:11
14 lines
1459 bytes
SiNuS napisał(a) w wiadomości: <367f8dc8.833599@news.vogel.pl>...
>LO Radymno napisał(a) w wiadomosci
>>Zrób sobie plik z direm całego katalogu np. przez Exec...
>Pod winda wykorzystujac taka metode mozna wczytac takze
>dlugie nazwy...

normalnie tez mozna. trzeba tylko przerzucic sie na inne przerwanka. (co w
pascalu oznacza inne procedurki :))))

--
/ deMon alias Bartłomiej Korupczyński \
| ICQ:18955456  bkorup@friko7.onet.pl |
| IRC:qqryq/deMon8  bkorup@polbox.com \
\ Exception 0D in module KERNEL. Press ENTER to explode
Re: Jak posortować pliki?
#103
Author: Marcin 'Qrczak' Kowalczyk
Date: Fri, 25 Dec 1998 19:41
19 lines
1788 bytes
On Fri, 25 Dec 1998, deMon wrote:

> >>Zrób sobie plik z direm całego katalogu np. przez Exec...
> >Pod winda wykorzystujac taka metode mozna wczytac takze
> >dlugie nazwy...
> 
> normalnie tez mozna. trzeba tylko przerzucic sie na inne przerwanka.
> (co w pascalu oznacza inne procedurki :))))

Będzie wtedy szybciej i bardziej niezawodnie niż exec command.com /c dir.
Pewne procedurki do długich nazw są na
  http://kki.net.pl/qrczak/programy/dos/drobiazgi/
(moduł nie będzie już rozwijany, bo przerzuciłem się na Linuxa).

-- 
 __("<    Marcin Kowalczyk * qrczak@knm.org.pl http://kki.net.pl/qrczak/
 \__/       GCS/M d- s+:-- a21 C+++>+++$ UL++>++++$ P+++ L++>++++$ E->++
  ^^                W++ N+++ o? K? w(---) O? M- V? PS-- PE++ Y? PGP->+ t
QRCZAK                  5? X- R tv-- b+>++ DI D- G+ e>++++ h! r--%>++ y-
Re: Jak posortować pliki?
#96
Author: Buczo
Date: Fri, 25 Dec 1998 22:07
19 lines
1743 bytes
    Marcin Rutkowski spłodził:
    [ćwiach]
>>Jak zrobić, aby posortować wyszukane pliki np. alfabetycznie?
>większość znanych programów wczytuje listę plików (nazw, itp.) do pamięci i
>tam ją sortuje.
>A sortowanie tablic to już całkiem inna bajka.

    Czy mógłbyś ją nam opowiedzieć? Bo ostanio miałem z czymś takim
problemy. Cóż, do experta z zakresu Pascala jeszcze mi (bardzo) daleko ;-]

    TIA!
--                                       /\__/\
hoping ... Buczo                        / \  / \
                                        \'/  \'/
Tomek Wojciak                           /  \/ | \
buczo@leda.3lo.lublin.spamtrap.pl       |     |  \
UIN 7404189                             |      \__\
_________________________________________\_  __  /_____
                                           ``  ``
Re: Jak posortować pliki?
#97
Author: Marcin Rutkowski
Date: Tue, 29 Dec 1998 13:23
10 lines
1319 bytes
>>A sortowanie tablic to już całkiem inna bajka.
>    Czy mógłbyś ją nam opowiedzieć? Bo ostanio miałem z czymś takim
>problemy. Cóż, do experta z zakresu Pascala jeszcze mi (bardzo) daleko ;-]
Sortowanie - fajnie !!!
Jak chces to moge cos takiego wstawic na swoje WWW (po Nowym Roku) ???

-- 
Marcin Rutkowski
MAIL: marcinru@vc.pl
WWW: http://friko.onet.pl/el/marcinru/
Re: Jak posortować pliki?
#99
Author: Artur Jedlinski
Date: Wed, 30 Dec 1998 12:51
13 lines
1261 bytes
Buczo <buczo@leda.3lo.lublin.spamtrap.pl> wrote:
:>A sortowanie tablic to już całkiem inna bajka.
:     Czy mógłbyś ją nam opowiedzieć? Bo ostanio miałem z czymś takim
: problemy. Cóż, do experta z zakresu Pascala jeszcze mi (bardzo) daleko ;-]

	Proponuje zajrzec do EXAMPLES, tam gdzies jest programik qsort.pas
pokazujacy jak sortuje sie tablice algorytmem Haara. Zmiana 2-3 linijek
dopasuje przykladowy program do twego przypadku.

	Nataniel <nataniel@rpg.pl>
        editor of "Nowe WIZJE"

"Co to za czasy, ze byle chlystek moze mowic NI do starej kobiety"
Re: Jak posortować pliki?
#98
Author: Marcin Rutkowski
Date: Fri, 01 Jan 1999 11:41
10 lines
1371 bytes
>>    Czy mógłbyś ją nam opowiedzieć? Bo ostanio miałem z czymś takim
>>problemy. Cóż, do experta z zakresu Pascala jeszcze mi (bardzo) daleko ;-]
>Sortowanie - fajnie !!!
>Jak chces to moge cos takiego wstawic na swoje WWW (po Nowym Roku) ???
Wstawilem w / -> wersja polska -> pliki !!!
(adres strony w stopce)
--
Marcin Rutkowski
MAIL: marcinru@vc.pl
WWW: http://friko.onet.pl/el/marcinru/
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads