Keresés Kategóriák Kedvencek

Programozás Pascalban: Fájlkezelés - 5. rész, Átnevezés

Készítette: FlamingClaw
2010. október 3. 10:31:49 - 4132 megtekintés
FlamingClaw - 13 éve, 9 hónapja

Turbo pascallal dolgozol -e vagy Free pascallal? Bár, mindegy, mindjárt megnézem mit tehetek, csinálok valamit mindjárt, csak várj egy picit...

Keledor - 13 éve, 9 hónapja

Pontosan. Csak pl tomb[1].txt file nevet, hogy tudom úgy megadni, hogy érvényes szintaktikája legyen? Gyakorlatilag a tömbök első eleme maga a sorszám lenne amit 0-ról indítok (a tömbök mezei TEXT-ek) és ezt szeretném valahogy megoldani de a példát megnézve és a videót a logikus majdnem az lenne, hogy a file nevét úgy adjam meg, hogy assign/rewrite(F,tomb[1],'.txt') de ilyent nem lehet. Eléggé kezdő vagyok és nem értek mindent még sajna.

FlamingClaw - 13 éve, 9 hónapja

Én, csináltam valamikor egy forrásfájl készítő programot. Aminek az volt a lényege, hogy egy .txt fájlba első indításkor raktam egy 0-t. Mindig abból a fájlból olvastam be ezt a számot, hozzáadtam az új fájl nevéhez, majd növeltem a számot a .txt fájlban. Így minden indításkor kaptam egy egyel nagyobb számot.
Pl: minta000.pas , a következő már minta001, aztán minta002, és így tovább, ilyesmire gondolsz?

Keledor - 13 éve, 9 hónapja

Hát tömböket gyártok és a tömböket fájlba tárolom de minden tömbnek (fájlnak) külön sorszámot akarok adni de persze nem manuálisan hanem azt akarom, hogy a program a tömbök (fájlok) elmentésekor automatikusan sorszámozza azokat. A visszaolvasásnál egyszerűbb mert ott elég ha manuálisan olvastatom be kérdés után (readln) a fájlt vele.

FlamingClaw - 13 éve, 9 hónapja

Program valami;
Uses Crt, Dos;
Var fnevek: Array[1..3]Of String; {tömbben tárolhatod a fájlok neveit}
Begin {főprogram}
  fnevek[1]:= 'elso.txt';
  fnevek[2]:= 'masodik.txt';
  fnevek[3]:= 'harmadik.txt'

End.

Vagy mire is gondoltál konkrétan?