Free Pascal - Práca so súbormi - Diskusia

Meno: jozo
Dátum: 5.10.2008, 17:28
Predmet: kurzor na zaciatok textoveho suboru

tak, a je tu dalsia otazka: pomocou
while not eof(subor) do begin
readln(subor,line);
writeln(line);
end;
som precital obsah textoveho suboru. Lenze, ked ho chcem precitat druhy krat, tak potrebujem, aby sa mi kurzor presunul naspat na zaciatok suboru, inak eof okamzite vrati true a nic sa neprecita. Napadlo ma, ze subor najprv zavriem a potom znova otvorim a kurzor budes zas na zaciatku suboru, ale je to trochu neprakticke riesenie.

---

Meno: jozo
Dátum: 5.10.2008, 16:57
Predmet: re

toto je super, pekne mi to spriehladnilo zdrojak, dik. Ten includovany subor, musi byt v nejakom textovom formate? uz som skusal s priponou .txt a tiez to fungovalo.

---

Meno: Sulo
Dátum: 5.10.2008, 15:48
Predmet: Re: include

Obmena #include z C++ je:
{$INCLUDE subor.inc}

Pascal ma vsak aj iny sposob - jednotky (unit). O nich napisem clanok niekedy neskor.

---

Meno: jozo
Dátum: 5.10.2008, 8:40
Predmet: zdrojovy kod z ineho suboru

vyzera to tak, ze moje otazky nemaju konca-kraja  Takze, je mozne, ze si vytvorim nejaky part.pas subor,v ktorom bude cast programu a v main.pas bude zvysok programu. Ze sa budu vykonavat prikazy z main.pas a potom nejake z part.pas. Myslim, ze v c++ sa to robi pomocou #include.

---

Meno: jozo
Dátum: 4.10.2008, 18:06
Predmet: ExtractFilePath

Este k tomu ChDir(ExtractFilePath(ParamStr(0)));
 : takto mi to neslo, stacilo dat
ChDir:(ExtractFilePath);
asi mam trochu iny compiler alebo co.

---

Meno: jozo
Dátum: 4.10.2008, 13:11
Predmet: re

super, este raz dakujem

---

Meno: Sulo
Dátum: 4.10.2008, 11:13
Predmet: Re4: cesta k suboru

Potom staci:
ChDir('C:\priecinok\');
A nemusis ani pouzit jednotku SysUtils.

---

Meno: jozo
Dátum: 4.10.2008, 8:01
Predmet: re

ok dik a keby som to chcel na nejaky iny adresar, tak chdir(extractfilepath("C:\...")); ?

---

Meno: Sulo
Dátum: 3.10.2008, 21:26
Predmet: Re3: cesta k suboru

Aktualny adresar sa da nastavit aj priamo v kode:

...
uses SysUtils;
...
ChDir(ExtractFilePath(ParamStr(0)));

Tento kod nastavi aktualny priecinok na ten, v ktorom sa nachadza EXE subor spusteneho programu.

---

Meno: jozo
Dátum: 3.10.2008, 6:00
Predmet: re

Aha, tak ty si sa pytal na IDE. Myslel som, ze len na jazyk. IDE mam Dev-Pascal od Bloodshedu a tam nemam menu run a v menu execute nic take nie je.

---