spletne tekstovne datoteke

Vse kar se tiče programiranja za internet.
Odgovori
errorage
Prispevkov: 4
Pridružen: 21.04.2008 20:01:41

spletne tekstovne datoteke

Odgovor Napisal/-a errorage » 23.04.2008 20:22:10

lep pozdrav, sem novinec v delphi programiranju in bi rad naredil nek osnoven program ki črpa podatke iz interneta. Tej naj bi bili shranjeni v tekstovnih datotekah. (v bistvu datotečni sistem, lahko bi uporabljal bazo, ampak se bo dalo tudi z datotekami.)

Jaz bi potreboval navodila kako eno .txt datoteko odpreti v osnovnem elementu, kot je listbox ali memo. Skratka da bo tudi program zaštekal da je to tekstovna datoteka. (rajši odpiram v listoboxu kot v text podatkovnem tipu ker je bolj pregledno in ima več vgrajenih funkcij in procedur)

Čeprav je to zalo začetniško vprašanje se zelo veselim pomoči. Hvala že v naprej.

Silver_War
Prispevkov: 664
Pridružen: 01.06.2004 14:50:41

spletne tekstovne datoteke

Odgovor Napisal/-a Silver_War » 23.04.2008 22:18:43

Napovemo tip datoteke

Koda: Izberi vse

var Datoteka: TextFile;
    Besedilo: String;
Za odpiranje tekstovne datoteke uporabimo.

Koda: Izberi vse

//Določimo handle do same datoteke
AsignFile(Datoteka, 'MojaDatoteka.txt');
//Odpremo datoteko za pisanje 
//POZOR! Če datoteka z istim imenom že obstaja, bo celotna njena vsebina izbrisana
Rewrite(Datoteka);
Za pisanje podatkov v datoteko uporabimo

Koda: Izberi vse

//Zapišemo podatke v datoteko
WriteStr(Datoteka, Besedilo);
Za zaprtje datoteke uporabimo

Koda: Izberi vse

//Sprostimo handle in datoteko zapremo
CloseFile(Datoteka);
Datoteke ne odpiramo in zapiramo za vsak vpis, temveč jo odpremo na začetku procesa, ter jo zapremo, ko je ta proces dokončan.
Zadnjič spremenil Silver_War, dne 23.04.2008 22:23:25, skupaj popravljeno 1 krat.

Silver_War
Prispevkov: 664
Pridružen: 01.06.2004 14:50:41

spletne tekstovne datoteke

Odgovor Napisal/-a Silver_War » 23.04.2008 22:25:58

Se opravičujem za eno malo napako zgoraj

Za pisanje podatkov v datoteko uporabimo

Koda: Izberi vse

//Zapišemo podatke v datoteko
Write(Datoteka, Besedilo); 

errorage
Prispevkov: 4
Pridružen: 21.04.2008 20:01:41

spletne tekstovne datoteke

Odgovor Napisal/-a errorage » 24.04.2008 17:35:16

Hvala, a to že znam :).

Morda sem zgoraj malo nerodno napisal, v okensko apikacijo želim dodati listbox, (listbox1) in vanj nato naložil .txt datoteko iz interneta.


primer nalaganja iz računalnika:

listbox1.items.loadfromfile('C:\mapa\datoteka.txt');

a jaz bi namesto poti C:\mapa\datoteka.txt potreboval pot podobno http://www.domena.com/datoteka.txt, skratka jaz bi v listbox spravil vsebino iz tekstovne datoteke iz spleta.

primer datoteke:
http://www.ietf.org/rfc/rfc2475.txt

dokument na dani povezavi bi rad spravil v listbox element.

Hvala v naprej

yocko
Prispevkov: 127
Pridružen: 26.02.2002 19:44:30

spletne tekstovne datoteke

Odgovor Napisal/-a yocko » 25.04.2008 08:25:52

Morda ti bo tole kaj pomagalo

LP, yocko

errorage
Prispevkov: 4
Pridružen: 21.04.2008 20:01:41

spletne tekstovne datoteke

Odgovor Napisal/-a errorage » 25.04.2008 12:33:17

Hvala, bom pregledal kmalu in sporočil, če sem odpravil problem :)

errorage
Prispevkov: 4
Pridružen: 21.04.2008 20:01:41

spletne tekstovne datoteke

Odgovor Napisal/-a errorage » 25.04.2008 13:48:35

Najlepša hvala, tisti članek in priložena koda programa mi je zelo pomagala!

LP

Odgovori