Munka Free Pascal szöveges fájlok
Kihagyja az összes üres, szimbólumok és EOL Tab amíg amíg eléri az első értelmes karakter vagy EOF. Visszaadja Igaz, ha az EOF
Elég gyakran lehet hallani a tanácsot: „A hibák elkerülése érdekében, ha dolgozik, fájlokat, adatokat a fájlból kell olvasni, ugyanúgy, mint ők zapisyva-”. Sajnos, ezt a tanácsot nem mindig vezet a helyes eredményt, amikor dolgozik szöveges fájlokat. Ezt támasztja alá a program listában 10.2.
1. lista 0 .2. programot txt_inout
programot txt_inout; var
j, K1, K2: integer; f: a szöveget;
Egy: string = 'sor'; b: string;
j: = 1-től 10 do kezdeni
bezár (f); writeln; reset (f);
j: = 1-től 10 do kezdeni
Ennek ellenőrzéséhez megtekintésével a fájl tartalma munka után pro- gramm. De mielőtt a végén a program nem módosítja, vagyis arra, hogy a 21. sor az első olvasatban a hiba üzenete van a fájlban ..:
Hiba 106. Érvénytelen numerikus formátumban
A lényeg az, hogy az első változó a bemeneti listában a B változó string típusú, maximális hossza 255 byte. Ezért egy fájlt egy változó b olvasható az első sorban teljesen, és amikor az a számértéket a változó k1 érvénytelennek karakter található, az elején a második sorban. A helyzetet orvosolni lehet korlátozásával maximális hossza változó b:
Miután egy ilyen korrekció eredményeként a program úgy néz ki, mint amilyennek lennie kellene:
Running "c: \ FPC \ myprog \ txt_inout.exe" Line február 1
Listing 10.3. programban francia
programban francia; var
f1, f2: szöveg; name1, name2: string; k, n: egész szám;
miközben nem EOF (f1) nem kezdődik
readln (f1, str); writeln (f2, '': n, str);
ha ParamCount <3 then begin
writeln ( 'Hiba kiindulási kell lennie:'); writeln ( „francia fájl1 fájl2 műszak”);
A program indítása után a parancssorból:
> Txt_inout 3.txt 4.txt 5
Ábra. 10.1. tartalmát a váltás egy szöveges fájlt
Annak ellenére, hogy a szülő program nem általánosan elfogadott eljárás abban az értelemben a szó, akkor elindul az operációs rendszer, és így adja át a parancssori paramétereket. Parancssori kapcsolók nabirae- mye után fut a program, egymástól legalább
legalább egy helyet. A paraméterek száma lehet kivonni a rendszer változó ParamCount. A paraméter értékét jelzi szimbolikus formában tömbök vom vonalak, ahol lehet letölteni ParamStr funkciót. Mivel ebben az esetben, az utolsó paraméter száma (a helyek száma behelyezett elején minden sor), majd meg kell alakítani egy szám- üvöltő gép méret a Val eljárással. Megjegyzés: a konst- ruktsiyu faj „” n használt írásakor egy fájlba. Ez állítja be a rögzített értéke, amely egyetlen helyet, de emellett tartalmaz egy olyan mutatóeszköz, amely alatt a jelzett érték az n adott területen pozíciókat. A kibocsátási rés van nyomva a jobb szélén a területen, és az összes vezető pozícióját is betölti terek.