Paz ovako, funkcija radi, posto je koristim.
LittleHacker, hajdemo jos jednom... please, poshtuj me, poshtuj ono sto ti kazem, naucices mnogo, ok?
Prvo i osnovno, nikad nemoj da dajes ime funkcijama koje je isto kao i original funkcije.
Prvo preimenuj tvoju function DeleteFile u function ObrisiFajl
99% sam siguran da je to u pitanju jer poziv unutar nje na DeleteFile vraca rezultat nje same. Ako nije to, onda sledece:
1. idi u project options, tab Compiler i iskljuci optimizaciju
2. uradi BUILD (ne ctrl + F9 ili F9)
3. Dodji kursorom na liniju sa deleteFile, i stisni F5 (linija mora da se zacrveni)
4. Stisni F9 da bi startovao program i sad u programu radi sve sta treba da bi dosao do DeleteFile
5. Kad stane na liniju, dodji mishem (ne klikci nista), odmah iza zagrade na (extractfilepath(application.ExeName)). Mora da ti pokaze putanju. Ako je u redu, dodji mishem tacno iza ] u delu ListBox1.items.strings[p]. Pogledaj da li ti vraca rezultat. Verujem da je tu greska. Onda stavi mis tacno iznad "p". Vidi vrednost.
6. Sad probaj da saberes (extractfilepath(application.ExeName)) +'\Baza podataka\'+ ListBox1.items.strings[p] + '.spo' i vidi da li je rezultat validan
|