Vienkārši sakot, teksta failos ir lasāms ASCII rakstzīmes. Mēs varam domāt, ka darbs ar teksta failu Delphi ir analogs informācijas atskaņošanai vai ierakstīšanai VCR lentē.
Lai gan ir iespējams veikt izmaiņas teksta failā, apstrādājiet informāciju vai pievienojiet failā datus, kas nav beigās teksta failu ieteicams izmantot tikai tad, kad mēs zinām, ka mēs strādājam ar parastu tekstu un šādas operācijas nav nepieciešams.
Tiek uzskatīts, ka teksta faili attēlo rindiņās formatētu rakstzīmju secību, kur katru rindu izbeidz ar rindas beigu marķieri (a CR / LF kombinācija).
Teksta fails un piešķīruma metode
Lai sāktu strādāt ar teksta failiem, jums ir jāsaista fails diskā ar faila mainīgo jūsu kodā - deklarējiet tipa mainīgo TypeFile un izmantojiet AssignFile procedūru, lai diskā esošo failu saistītu ar failu mainīgs.
Informācijas lasīšana no teksta faila
Ja mēs vēlamies faila saturu nolasīt virkņu sarakstā, darbu veiks tikai viena koda rinda.
Lai lasītu informāciju no faila pa rindām, mums jāatver fails
ievadi izmantojot Atiestatīt procedūra. Kad fails ir atiestatīts, mēs varam to izmantot LasītLn lasīt informāciju no faila (nolasa vienu teksta rindu no faila, pēc tam pāriet uz nākamo rindu):Pēc vienas teksta rindas pievienošanas no faila piezīmju komponentam SomeTxtFile ir jāaizver. To dara Aizveriet atslēgvārds.
Informācijas nolasīšanai no faila mēs varam izmantot arī Lasīšanas procedūru. Lasīšana darbojas tāpat kā ReadLn, izņemot to, ka tas nepārvieto rādītāju uz nākamo rindu.
EOF - faila beigas
Izmantojiet funkciju EOF, lai pārliecinātos, ka nemēģināt lasīt tālāk par faila beigām. Teiksim, ka vēlamies faila saturu parādīt ziņojumu lodziņos - pa vienai rindai vienlaicīgi, līdz nonākam pie faila beigām:
Piezīme: Labāk ir izmantot Kamēr cilpa nekā līdz cilpai, lai ņemtu vērā (maz ticamu) iespēju, ka fails pastāv, bet nesatur datus.
Teksta rakstīšana failā
WriteLn iespējams, ir visizplatītākais veids, kā nosūtīt atsevišķu informāciju uz failu. Šis kods nolasīs tekstu no Memo1 komponenta (pa rindām) un nosūtīs to uz kādu jaunizveidotu teksta failu.
Atkarībā no faila stāvokļa, kas tiek piegādāts procedūrai Pārrakstīt, tas izveido jaunu failu (atver failu izvadei) ar nosaukumu SomeTextFile. Ja fails ar tādu pašu nosaukumu jau pastāv, tas tiek izdzēsts un tā vietā tiek izveidots jauns tukšs fails. Ja SomeTextFile jau ir atvērts, tas vispirms tiek aizvērts un pēc tam izveidots no jauna. Pašreizējā faila pozīcija ir iestatīta uz tukšā faila sākumu.
Piezīme: Memo1.Lines. SaveToFile ('c: \ MyTextFile.txt') rīkosies tāpat.
Dažreiz mums vienkārši jāpievieno daži teksta dati esoša faila beigās. Ja tas tā ir, mēs piezvanīsim Papildināt lai nodrošinātu, ka fails tiek atvērts ar piekļuvi tikai rakstīšanai ar faila rādītāju, kas atrodas faila galā. Kaut kas kā:
Esiet informēts par izņēmumiem
Parasti jums vienmēr vajadzētu izmantot izņēmumu apstrāde strādājot ar failiem. I / O ir pārsteigumu pilns. Vienmēr izmantojiet CloseFile pēdējā blokā, lai izvairītos no iespējas sabojāt lietotāja FAT. Visi iepriekšējie piemēri ir jāpārraksta šādi:
Manipulēšana ar strukturētiem failiem
Delphi ir iespēja apstrādāt gan ASCII failus, gan failus, kas satur bināros datus. Šeit ir metodes, kā strādāt ar drukāti un nerakstīti (bināri) faili.