Paprasčiau tariant, tekstiniai failai yra skaitomi ASCII personažai. Galime galvoti apie darbą su tekstiniu failu „Delphi“ kaip analogišką informacijos atkūrimui ar įrašymui į VCR juostą.
Nors teksto failą galima pakeisti, pereikite prie tvarkymo informacijos arba pridėkite prie failo tam tikrus duomenis, išskyrus pabaigoje patartina naudoti tekstinį failą tik tada, kai žinome, kad dirbame su įprastu tekstu, o tokių operacijų nėra būtina.
Laikoma, kad tekstiniai failai atspindi simbolių seką, suformatuotą į eilutes, kai kiekviena eilutė baigiasi eilutės pabaigos žymekliu (a CR / LF derinys).
„TextFile“ ir priskyrimo metodas
Norėdami pradėti dirbti su tekstiniais failais, turite susieti failą diske su failo kintamuoju jūsų kode - deklaruokite tipo kintamąjį „TextFile“ ir naudokite „AssignFile“ procedūrą susieti failą diske su failu kintamasis.
Informacijos skaitymas iš teksto failo
Jei norime nuskaityti failo turinį į eilučių sąrašą, darbą atliks tik viena kodo eilutė.
Norėdami perskaityti informaciją iš failo eilutės po eilės, turime atidaryti failą
įvestis naudojant Atstatyti procedūra. Kai failas bus iš naujo nustatytas, galėsime naudoti SkaitytiLn skaityti informaciją iš failo (nuskaito vieną teksto eilutę iš failo, tada pereina į kitą eilutę):Pridėjus vieną teksto eilutę iš failo prie atmintinės komponento „SomeTxtFile“ reikia uždaryti. Tai daro Uždaryti raktinis žodis.
Taip pat galime naudoti Skaitymo procedūrą norėdami nuskaityti informaciją iš failo. Skaitymas veikia taip pat kaip „ReadLn“, išskyrus tai, kad jis nekelia žymeklio į kitą eilutę.
EOF - bylos pabaiga
Naudokite EOF funkciją ir įsitikinkite, kad nebandote skaityti už failo pabaigos. Tarkime, kad norime failo turinį rodyti pranešimų dėžutėse - po vieną eilutę vienu metu, kol pateksime į failo pabaigą:
Pastaba: geriau naudoti Nors kilpa nei iki kilpos, kad būtų atsižvelgta į (mažai tikėtiną) galimybę, kad failas egzistuoja, bet jame nėra jokių duomenų.
Teksto rašymas į failą
WriteLn yra bene labiausiai paplitęs būdas atsiųsti informaciją į failą. Šis kodas nuskaitys „Memo1“ komponento tekstą (eilutė po eilutės) ir nusiųs jį į kai ką naujai sukurtą tekstinį failą.
Priklausomai nuo failo, pateikto perrašymo procedūrai, būsenos, jis sukuria naują failą (atidaro failą išėjimui) su pavadinimu SomeTextFile. Jei failas tokiu pačiu pavadinimu jau yra, jis ištrinamas ir vietoje jo sukuriamas naujas tuščias failas. Jei „SomeTextFile“ jau atidaryta, ji pirmiausia uždaroma, o tada sukuriama iš naujo. Dabartinė failo vieta nustatoma į tuščio failo pradžią.
Pastaba: „Memo1.Lines“. „SaveToFile“ ('c: \ MyTextFile.txt') darys tą patį.
Kartais mums tereikia pridėti šiek tiek teksto duomenų esamo failo pabaigoje. Jei taip yra, paskambinsime Pridėti norėdami įsitikinti, kad failas atidaromas naudojant tik rašymo prieigą, kai failo rodyklė yra failo gale. Kažkas kaip:
Saugokitės išimčių
Apskritai, jūs visada turėtumėte naudoti išimties tvarkymas kai dirbate su failais. I / O yra kupinas netikėtumų. Visada naudokite „CloseFile“ paskutiniame bloke, kad išvengtumėte galimybės sugadinti vartotojo FAT. Visi ankstesni pavyzdžiai turėtų būti perrašyti taip:
Manipuliavimas su struktūriniais failais
„Delphi“ turi galimybę tvarkyti ir ASCII failus, ir failus, kuriuose yra dvejetainiai duomenys. Čia yra darbo su įvestos ir neįrašytos (dvejetainės) bylos.