Dotaz: Pascal - kopie souboru?

[PEtr]

Zdravím, měl bych dotaz, jakým způsobem vytvořit kopii souboru "vstup.dat" , existuje na to nějaký příkaz??? díky

Odpovědi

[jas]

Otvoriť daný súbor na čítanie(podľa typu súboru,najistejšie je binárne), otvoriť si druhý na zapisovanie, z jedného čítať a súčasne do druhého zapisovať. Najlepšie je si na to asi spraviť potom funkciu. Je to len pár riadkov, pre ktoré sa snáď ani neoplatí hľadať, či na to existuje už nejaká funkcia.

[pc2005]

Ještě si pamatuju, že v starém Turbo Pascalu se dalo zavolat příkaz MSDOSu, myslím pomocí něčeho jako exec, potom by to bylo jednoduché, zavolá se dd nebo cp a je to, nevím zda to ale FreePascal umí taky (předpokládám, že se o něm bavíme).

[Josef Kufner]

Akorát je vhodné používat funkci, které se předává seznam parametrů jako pole a nikoliv řetězec s celým příkazem, kde je nutné hlídat různé ošklivé znaky.

Občas na tyto operace bývá nějaká pěkná knihovní funkce, která se o to postará sama a bezpečně. Koukni se do dokumentace, snad to tam bude.

[luky]

buf: array [1..1024] of byte;
cnt: word;
...
while not eof(src) do
begin
  blockread(src, buf, 1024, cnt);
  blockwrite(dst, buf, cnt);
end;

[r.v.]

procedury BlockRead, BlockWrite mají v Borland Pascalském IDE nápovědu s příkladem

[jezevec]

Jen doplnění,

tyhle funkce jsou i ve Free pascalu/Lazarusu. V GNU Pascalu si nejsem jisty...