Pretraga fajlova - dodatak

Pretraga fajlova - dodatak

offline
  • Pridružio: 27 Jun 2005
  • Poruke: 36

iz prethodne teme sam uspeo da upotrebim finkciju i sve radi ok. Ono sto meni treba kada mi funkcija izlista subfoldere to je da mi pokaze samo ime subfoldera iza poslednjeg '\' bez celokupne putanje. Ima li neka caka za ovo ili mora rucno da se parsuje string?



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Moraces da upotrebis StrUtils i njegove procedure. Imas tamo neke procedure sa delimiterima, mozes to da iskoristis.



offline
  • Strog  Male
  • Stručni saradnik
    Web programiranje
  • Bojan Kopanja
  • Web & Mobile developer @ ZeusSoftware
  • Pridružio: 26 Jul 2003
  • Poruke: 2597
  • Gde živiš: Stara Pazova

Postoji f-ja "StrRScan" koja ti vraca pointer na poslednje pojavljivanje nekog karaktera, tako da posle pozivanja te f-je moras da od toga oduzmes jos adresu prvog karaktera u stringu i onda dobijas poziciju u stringu tog karaktera koji trazis ( u ovom tvom slucaju to je '\' ).

Evo ti malo vise o funkciji: http://pascal.sources.ru/tmt/help/strrscan_func.htm

a pozivas je ovako:StrRScan(PChar(StringKojiImas), '\ ')

a za automatsko izracunavanje pozicije mozes da koristis to ovako:
var I: Integer;     StringUlaz: String; ............. I := StrRScan(PChar(StringUlaz), '\') - PChar(StringUlaz) + 1;

posle cega bi u I trebao da imas poziciju poslednjeg '\' i onda ti je lako da odseces to sto ti vec treba...

E sad za ovaj kod za izracunavanje pozicije nisam bas siguran 100% posto ga pisem napamet, pa proveri to posto ti mozda da poziciju ispred ili iza '\' pa ti ne bude radilo kako treba... Uglevnom to ti je resenje tvog problema Smile.

offline
  • Pridružio: 27 Jun 2005
  • Poruke: 36

ok, probacemo Wink

Ko je trenutno na forumu
 

Ukupno su 1150 korisnika na forumu :: 38 registrovanih, 6 sakrivenih i 1106 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: Bobrock1, Brana01, cavatina, Denaya, Dimitrise93, FOX, Gargantua, hatman, hologram, HrcAk47, ikan, Istman, Karla, Kubovac, kunktator, laki_bb, Mcdado, mercedesamg, Mercury, Milos ZA, milutin134, Mixelotti, mrav pesadinac, nemkea71, panzerwaffe, pein, Ripanjac, S2M, Srle993, stegonosa, tomigun, vathra, vukovi, YugoSlav, zbazin, zeo, žeks62, 1107