FilePos

Vrací aktuální pozici v souboru.

Deklarace

function FilePos(var F): Longint;

Režim

Windows, Reálný, Chráněný

Poznámky

F je proměnná typu soubor. Pokud je aktuální pozice na začátku souboru, vrací FilePos(F) hodnotu 0. Pokud je aktuální pozice na konci souboru, tj. pokud Eof(F) je True, FilePos(F) je rovna FileSize(F).

V režimu {$I-} vrátí funkce IOResult hodnotu 0, pokud operace proběhla úspěšně, jinak vrátí nenulový kód chyby.

Omezení

Nelze aplikovat na textový soubor. Soubor musí být otevřený.

Viz také

FileSize

Seek

Vzorový příklad

{FilePos.PAS}
{Vzorový příklad pro FilePos, FileSize  a Seek.}
{ Pro Windows: }
{ uses WinCrt; }
 var
   f: file of Byte;
   size : Longint;
 begin
   { Získání textu z příkazové řádky }
   Assign(f, ParamStr(1));
   Reset(f);
   size := FileSize(f);
   Writeln('Velikost souboru v bajtech: ',size);
   Writeln('Nastavení do poloviny souboru...');
   Seek(f,size div 2);
   Writeln('Pozice je nyní ',FilePos(f));
   Close(f);
 end.