Moduły » System

FileSize

  • 2010-10-31 18:27
  • 4 komentarze
  • 317 odsłon
  • Oceń ten tekst jako pierwszy
FileSize
Moduł: System

function FileSize(var F): Integer;


Funkcja umożliwia odczyt rozmiaru pliku określonego w parametrze F. Parametr musi wskazywać na plik amorficzny (typ File) tekstowy (typ TextFile) lub typowany.

Przyklad:

procedure TForm1.Button1Click(Sender: TObject);
var
  F1: File;
  L1: Longint;
begin
  AssignFile(F1, 'c:\WINDOWS\winhelp.exe');
  Reset(F1);
  L1 := FileSize(F1);
  Button1.Caption := IntToStr(L1);
  CloseFile(F1);
end;


Zobacz też:

4 komentarze

Bono94 2008-08-31 14:08

A jak to "przełożyć" na megabajty?

Coldpeer 2006-07-13 00:10

No jak to w jakich,w bajtach :P

tomalla 2006-05-06 12:50

no dobra, ale w jakich jednostkach to jest?
jak wybrany plik ma 1 kb, program zwraca mi 103.

Adam Boduch 2006-01-17 11:35

- Brak opisu funkcji
- Brak funkcji CloseFile ktora zamyka plik
- Po co przypisywac do kategorii "Funkcje matematyczne"? Co to za funkcja matematyczna?

I tak przydaloby sie cos jeszcze dodac o plikach typowanych. Ze odczytuje ilosc rekordow w pliku (IMHO?).