FileSize

PiotrB
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 komentarzy

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

No jak to w jakich,w bajtach :P

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

  • 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?).