Registracija

Pretrazivanje direktorijuma i unos imena fajlova u string promenljive

Odgovori Nova tema

1 odgovor
3.910 pregleda

Pretrazivanje direktorijuma i unos imena fajlova u string promenljive 07.10.2005. u 22:39 · pre 256 meseci #1

Dakle zadatak:

U datom direktorijumu u kome se nalaze *.jpg fajlovi, sve fajlove odnosno njihove nazive upisati u promenljive (string).
Primer ako se u direktorijumu nalaze sledeci fajlovi:

pas.jpg
macka.jpg
pacov.jpg

Kako da te nazive upisem u string1, string2 i string3 ali naravno nazive ne znamo pa program mora da pretrazi direktorijum.

Re: Pretrazivanje direktorijuma i unos imena fajlova u string promenljive 07.10.2005. u 23:14 · pre 256 meseci #2

Imas FindFirst i FindNext funkcije koje nalaze fajlove. Lako se koriste.

Code:
var
  sr: TSearchRec;

begin
  if FindFirst('C:\Folder\*.jpg', faAnyFile, sr) = 0 then
  begin
    repeat
      if (sr.Attr and faDirectory) = 0 then
      begin
        // Radi sta hoces s podacima u promenljivoj sr
      end;
    until FindNext(sr) <> 0;
    FindClose(sr);
  end;
end;

Potpis

Play Store

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme