A kiválasztott változat és az aktuális verzió közötti különbségek a következők.
| Előző változat mindkét oldalon Előző változat | |||
|
inf-prog-fszi:tipusos_allomanyok [2017/06/22 05:07] beistvan |
inf-prog-fszi:tipusos_allomanyok [2017/06/22 05:17] (aktuális) beistvan |
||
|---|---|---|---|
| Sor 1: | Sor 1: | ||
| + | ====== Típusos állományok ====== | ||
| + | 1. Fájl típusú változó deklarálása | ||
| + | <code pascal fajlvaltozo1.pas> | ||
| + | var | ||
| + | f: file of típus; | ||
| + | </ | ||
| + | |||
| + | 2. Fájl változó hozzárendelése a háttértáron lévő állományhoz | ||
| + | |||
| + | <code pascal fajlhozzarendel1.pas> | ||
| + | assign (f, ' | ||
| + | </ | ||
| + | |||
| + | 3. Fájl beviteli-kiviteli hibáinak vizsgálata fájlmegnyitásakor | ||
| + | <code pascal fajlolvasasnyitas1.pas> | ||
| + | {$i-} | ||
| + | Reset(f); | ||
| + | if IOResult <> 0 then | ||
| + | begin | ||
| + | Write (' | ||
| + | Readln; | ||
| + | Halt (1); | ||
| + | end; | ||
| + | {$i+} | ||
| + | </ | ||
| + | |||
| + | 4. Megnyitás írásra vagy újraírásra | ||
| + | <code pascal fajlirasnyitas1.pas> | ||
| + | Rewrite (f); | ||
| + | </ | ||
| + | |||
| + | 5. Megnyitás hozzáírásra | ||
| + | <code pascal fajlhozzairas1.pas> | ||
| + | Append(f); | ||
| + | </ | ||
| + | |||
| + | 6. Írás a fájlba | ||
| + | <code pascal fajlbairas1.pas> | ||
| + | Write(f, adatok); | ||
| + | </ | ||
| + | |||
| + | 7. Olvasás a fájlból | ||
| + | <code pascal fajlbololvasas1.pas> | ||
| + | Read(f, valtozo); | ||
| + | </ | ||
| + | |||
| + | 8. Az összes adat beolvasása a fájlból | ||
| + | <code pascal fajlmindbeolvas1.pas> | ||
| + | index:=0; | ||
| + | While not eof(f) do | ||
| + | begin | ||
| + | index: | ||
| + | Read(f, tomb[index]); | ||
| + | end; | ||
| + | beolvasott_adatmennyiseg := index; | ||
| + | </ | ||
| + | |||
| + | 9. A fájl egy bizonyos sorszámú elemének keresése | ||
| + | <code pascal fajlkeres1.pas> | ||
| + | Seek(f, pozicio); | ||
| + | </ | ||
| + | |||
| + | 10. A fájl bezárása | ||
| + | <code pascal fajlbezaras1.pas> | ||
| + | Close(f); | ||
| + | </ | ||