FileSize: Porovnání verzí
Skočit na navigaci
Skočit na vyhledávání
m (1 revízia: Unit System) |
|||
Řádek 42: | Řádek 42: | ||
[[Category:System]] | [[Category:System]] | ||
[[Category:Funkce System]] | [[Category:Funkce System]] | ||
+ | [[Category:Vstupně/výstupní procedury a funkce]] |
Aktuální verze z 5. 10. 2012, 20:51
Vrací aktuální velikost souboru.
- Deklarace
function FileSize(var F): Longint;
- Režim
- Windows, Reálný, Chráněný
- Poznámky
- F je proměnná typu soubor. FileSize(F) vrací počet složek v F. Pokud je soubor prázdný, FileSize(F) vrací 0.
- 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é
- FilePos
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.